/src/slix/incantea.clj

http://github.com/ksuzuki/Sevenri · Clojure · 40 lines · 20 code · 8 blank · 12 comment · 0 complexity · c6a2adfcb3407fbc12a6095ab8df12b4 MD5 · raw file

  1. ;; %! Copyright (C) 2011 Kei Suzuki All rights reserved. !%
  2. ;;
  3. ;; This file is part of Sevenri, a Clojure environment ("This Software").
  4. ;;
  5. ;; The use and distribution terms for this software are covered by the Eclipse
  6. ;; Public License version 1.0 (http://opensource.org/licenses/eclipse-1.0.php)
  7. ;; which can be found in the COPYING at the root of this distribution.
  8. ;; By using this software in any fashion, you are agreeing to be bound by the
  9. ;; terms of this license.
  10. ;; You must not remove this notice, or any other, from this software.
  11. (ns ^{:slix true}
  12. slix.incantea
  13. (:use [sevenri config core event log slix ui utils]
  14. [slix.incantea core init ui]))
  15. ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  16. (use-incanter)
  17. ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  18. (defn frame-created
  19. [event]
  20. (add-ui))
  21. (defn opened
  22. [event]
  23. (download-datasets)
  24. (init-ui)
  25. (set-slix-visible))
  26. (defn saving
  27. [event]
  28. (save-incantea event))
  29. (defn closing
  30. [event]
  31. (remove-all-sketches)
  32. (close-incantea-repl (slix-name)))