From 945a8f3f874ecf255f15304fe0f52f2b35940685 Mon Sep 17 00:00:00 2001
From: Chris Holt <lefthandedgoat@gmail.com>
Date: Sun, 7 Sep 2014 13:49:09 -0500
Subject: [PATCH] bug fix

---
 src/canopy/canopy.fs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/canopy/canopy.fs b/src/canopy/canopy.fs
index d75dc2ad..9956e680 100644
--- a/src/canopy/canopy.fs
+++ b/src/canopy/canopy.fs
@@ -781,7 +781,7 @@ let addFinder finder =
     
 //hints    
 let private addHintFinder hints finder = hints |> Seq.append (seq { yield finder })
-let private addSelector finder selector hintType =
+let private addSelector finder hintType selector =
     //gaurd against adding same hintType multipe times and increase size of finder seq
     if not <| (hints.ContainsKey(selector) && addedHints.[selector] |> List.exists (fun hint -> hint = hintType)) then
         if hints.ContainsKey(selector) then