 
 
 
-(defn delete-link [path]
+(defn- delete-link [path]
   [:a
    {:onclick
     (str "var delconf = confirm ('Do you really want to delete " (url-decode path)" ?');

  (html5
   (gen-header (str my-name ":" app))
     [:body
      [:h1 (path->pretty-path app)]
      (apps-div app apps)
      (tokens-div app tokens)]))

          other-keys))))


(defn- tokens-div [app tokens]
  [:div {:name "tokens-div"}
   [:h2 "Tokens"]
   [:table {:border 1}
