Permalink
Browse files

fix :mycroft/deref namespace

  • Loading branch information...
1 parent ce0ae1e commit f88138bbf6aa454cb8ab1bb3c6cd3b53e25f82a1 @stuarthalloway stuarthalloway committed Sep 27, 2010
Showing with 2 additions and 2 deletions.
  1. +1 −1 src/mycroft/breadcrumb.clj
  2. +1 −1 src/mycroft/history.clj
@@ -84,7 +84,7 @@
(if selectors (link-to var) (link-name var))])
(when selectors
- (let [first-crumb (if (= ::deref (first selectors)) 2 1)]
+ (let [first-crumb (if (= :mycroft/deref (first selectors)) 2 1)]
[:span
(->> (map (fn [n] (subvec selectors 0 n)) (range first-crumb (count selectors)))
(map (fn [partial-selectors]
View
@@ -7,7 +7,7 @@
"Add an object to history, returning its URL."
[obj]
(str "/vars/mycroft.history/history?"
- (breadcrumb/options->query-string {:selectors [:mycroft./deref :mycroft./deref (dec (count (swap! history conj obj)))]})))
+ (breadcrumb/options->query-string {:selectors [:mycroft/deref :mycroft/deref (dec (count (swap! history conj obj)))]})))

0 comments on commit f88138b

Please sign in to comment.