            a-paste (action :handler a-paste :name "Paste" :tip "Paste text from the clipboard.")
            a-cut (action :handler a-cut :name "Cut" :tip "Cut text to the clipboard.")
            a-save-as (action :handler a-save-as :name "Save As" :tip "Save the current file.")
-           a-eval-file (action :handler a-eval-file :name "Evaluate" :tip "Evaluate the current file.")
+           a-eval-file (action :handler a-eval-file :name "Evaluate" :tip "Evaluate the current file.")           
            a-projects (map #(action :handler (make-a-active-project %)
                                     :name (str (:group %) "/" (:name %))
                                     :tip (str (:group %) "/" (:name %)))

        menus (menubar
                :items [(menu :text "File" :items [action-new action-open action-save action-save-as action-close-tab action-exit])
                        (menu :text "Edit" :items [action-copy action-cut action-paste])
                        (menu :text "Run" :items [action-eval-file])
                        (menu :text "Projects" :items (into [] action-projects))
                        (menu :text "Git" :items [])
                        (menu :text "Brevis" :items [action-restart-brevis]) 

        action-cut (action :handler a-cut :name "Cut" :tip "Cut text to the clipboard.")
        action-save-as (action :handler a-save-as :name "Save As" :tip "Save the current file.")
        action-eval-file (action :handler a-eval-file :name "Evaluate" :tip "Evaluate the current file.")
        action-set-REPL-to-project (action :handler a-set-REPL-to-project :name "Restart project REPL" :tip "Restart REPL for current file's project.")
        action-restart-brevis
        (action :handler (fn [e]
                           (System/exit 1))
