/src/slix/incantea.clj

 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
12(ns ^{:slix true}
13  slix.incantea
14  (:use [sevenri config core event log slix ui utils]
15        [slix.incantea core init ui]))
16
17;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
18
19(use-incanter)
20
21;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
22
23(defn frame-created
24  [event]
25  (add-ui))
26
27(defn opened
28  [event]
29  (download-datasets)
30  (init-ui)
31  (set-slix-visible))
32
33(defn saving
34  [event]
35  (save-incantea event))
36
37(defn closing
38  [event]
39  (remove-all-sketches)
40  (close-incantea-repl (slix-name)))