Cuttle :)

oakmac · Jan 19, 2015 · 28872fb · 28872fb · comamitc · Jan 19, 2015
1 parent 1a7dd59
commit 28872fb
Show file tree

Hide file tree

Showing 20 changed files with 73 additions and 66 deletions.
diff --git a/LICENSE.md b/LICENSE.md
@@ -1,4 +1,4 @@
-Copyright 2014 Chris Oakman and contributors
+Copyright 2015 Chris Oakman and contributors
 
 Permission is hereby granted, free of charge, to any person obtaining
 a copy of this software and associated documentation files (the
@@ -17,4 +17,4 @@ MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
 NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE
 LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION
 OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
-WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
+WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
diff --git a/README.md b/README.md
@@ -1,25 +1,22 @@
-# cljsbuild-ui
+# Cuttle
 
 A user interface for the ClojureScript Compiler.
 
 <img src="screenshots/2014-10-30-preview.png">
 
 ## Goal
 
-Getting started with ClojureScript is one of the more difficult things about
-the language. JS devs are often unfamiliar with Leiningen and project.clj seems
-very foreign initially. The goal of this project is to reduce the barrier to
-entry for new ClojureScript devs.
+Getting started with ClojureScript is one of the more difficult things about the
+language. JavaScript developers are often unfamiliar with Leiningen and
+project.clj seems very foreign initially. The goal of this project is to reduce
+the barrier to entry for new ClojureScript devs.
 
 We also want to improve the usability of the compiler in day-to-day workflows.
 The user should be able to build/clean their projects with a few clicks, and
 they should see meaningful errors and warnings at a glance.
 
 ## Development Setup
 
-Development is currently in a very early stage and things should be expected to
-break on a regular basis.
-
 1. Install [Leiningen] and [Node.js].
 1. One-time setup. Run from the project directory:
 
@@ -65,11 +62,20 @@ If you want Chrome Dev Tools to auto-open when you start the program, add a
 `config.json` file in the `app/` folder. An `example.config.json` is
 provided. This is disabled in the release.
 
+## About the Name
+
+Cuttle is named after the [Cuttlefish] because [Shaun] likes cephalopods.
+
+Cuttle is not an acronym and should be capitalized like a proper noun when used
+in a sentence.
+
 ## License
 
 All code licensed under the terms of the [MIT
-License](https://github.com/oakmac/cljsbuild-ui/blob/master/LICENSE.md).
+License](https://github.com/oakmac/cuttle/blob/master/LICENSE.md).
 
 [Leiningen]:http://leiningen.org
 [Node.js]:http://nodejs.org
 [Atom Shell]:https://github.com/atom/atom-shell
+[Cuttlefish]:http://en.wikipedia.org/wiki/Cuttlefish
+[Shaun]:https://github.com/shaunlebron
diff --git a/app/index.html b/app/index.html
@@ -2,7 +2,7 @@
 <html>
 <head>
   <meta charset="utf-8">
-  <title>ClojureScript Compiler</title>
+  <title>Cuttle - ClojureScript Compiler</title>
   <link rel="stylesheet" href="css/main.min.css">
 </head>
 <body>

diff --git a/app/package.json b/app/package.json
@@ -1,5 +1,5 @@
 {
-  "name" : "cljsbuild-ui",
+  "name" : "Cuttle",
   "version" : "0.1.0",
   "main" : "app.js"
-}
+}
diff --git a/launch.bat b/launch.bat
@@ -1,4 +1,4 @@
-:: Launch cljsbuild-ui using our local Atom Shell installation
+:: Launch Cuttle using our local Atom Shell installation
 :: (on Windows)
 
 atom-shell\atom.exe app
diff --git a/launch.sh b/launch.sh
@@ -1,6 +1,6 @@
 #!/bin/bash
 
-# Launch cljsbuild-ui using our local Atom Shell installation
+# Launch Cuttle using our local Atom Shell installation
 # (Mac, Linux, or Cygwin)
 
 # from: http://stackoverflow.com/a/17072017/142317

diff --git a/package.json b/package.json
@@ -1,10 +1,10 @@
 {
-  "name": "cljsbuild-ui",
-  "homepage": "https://github.com/oakmac/cljsbuild-ui",
+  "name": "Cuttle",
+  "homepage": "https://github.com/oakmac/cuttle",
   "license": "MIT",
   "repository": {
     "type": "git",
-    "url": "https://github.com/oakmac/cljsbuild-ui.git"
+    "url": "https://github.com/oakmac/cuttle.git"
   },
   "dependencies": {
     "express": "4.1.x",

diff --git a/project.clj b/project.clj
@@ -1,9 +1,9 @@
-(defproject cljsbuild-ui "0.1.0-SNAPSHOT"
+(defproject cuttle "0.1.0-SNAPSHOT"
   :description "A user interface for the ClojureScript compiler."
-  :url "https://github.com/oakmac/cljsbuild-ui"
+  :url "https://github.com/oakmac/cuttle"
   :license {
     :name "MIT License"
-    :url "https://github.com/oakmac/cljsbuild-ui/blob/master/LICENSE.md"
+    :url "https://github.com/oakmac/cuttle/blob/master/LICENSE.md"
     :distribution :repo}
 
   :source-paths ["src-clj"]

diff --git a/release.sh b/release.sh
@@ -1,6 +1,6 @@
 #!/bin/bash
 
-# Create cljsbuild-ui release using our local Atom Shell installation
+# Create Cuttle release using our local Atom Shell installation
 # (Mac, Linux, or Cygwin)
 
 #----------------------------------------------------------------------
@@ -76,14 +76,14 @@ if [ "$OS" == "mac" ]; then
   FULL_PLIST="$(pwd)/$RELEASE_DIR/$PLIST"
 
   defaults write $FULL_PLIST CFBundleIconFile 'app/img/clojure-logo.icns'
-  defaults write $FULL_PLIST CFBundleDisplayName 'CLJS-UI'
-  defaults write $FULL_PLIST CFBundleName 'CLJS-UI'
+  defaults write $FULL_PLIST CFBundleDisplayName 'Cuttle'
+  defaults write $FULL_PLIST CFBundleName 'Cuttle'
 
-  mv $RELEASE_DIR/Atom.app $RELEASE_DIR/ClojureScript.app
+  mv $RELEASE_DIR/Atom.app $RELEASE_DIR/Cuttle.app
 
 elif [ "$OS" == "linux" ]; then
 
-  mv $RELEASE_DIR/atom $RELEASE_DIR/ClojureScript
+  mv $RELEASE_DIR/atom $RELEASE_DIR/Cuttle
 
 elif [ "$OS" == "windows" ]; then
 
@@ -93,7 +93,7 @@ elif [ "$OS" == "windows" ]; then
                --resourceName:1 \
                --resourceFile:$RELEASE_RSRC/app/img/clojure-logo.ico
 
-  mv $RELEASE_DIR/atom.exe $RELEASE_DIR/ClojureScript.exe
+  mv $RELEASE_DIR/atom.exe $RELEASE_DIR/Cuttle.exe
 
 fi
 

diff --git a/setup.bat b/setup.bat
@@ -18,4 +18,4 @@ call grunt download-atom-shell
 echo. & echo Building lein profile tool...
 call build-lein-profile-tool.bat
 
-echo. & echo Setup complete.
+echo. & echo Cuttle setup complete.
diff --git a/setup.sh b/setup.sh
@@ -21,4 +21,4 @@ grunt download-atom-shell
 echo; echo "Building lein profile tool..."
 ./build-lein-profile-tool.sh
 
-echo; echo "Setup complete."
+echo; echo "Cuttle setup complete."
diff --git a/src-cljs/cljsbuild_ui/cljsbuild/config.cljs → src-cljs/cuttle/cljsbuild/config.cljs b/src-cljs/cljsbuild_ui/cljsbuild/config.cljs → src-cljs/cuttle/cljsbuild/config.cljs
@@ -1,3 +1,8 @@
+(ns cuttle.cljsbuild.config
+  "Utilities for parsing the cljsbuild config."
+  #_(:require
+    [clojure.pprint :as pprint]))
+
 ;;; Taken from "lein-cljsbuild" for retrieving normalized cljsbuild configs.
 ;;;
 ;;; Source:
@@ -8,11 +13,6 @@
 ;;;     or wait for this cljsbuild pull-request to retrieve opts
 ;;;     with `lein cljsbuild list`: https://github.com/emezeske/lein-cljsbuild/pull/338
 
-(ns cljsbuild-ui.cljsbuild.config
-  "Utilities for parsing the cljsbuild config."
-  #_(:require
-    [clojure.pprint :as pprint]))
-
 (defn in-target-path [target-path subpath]
   (str target-path "/cljsbuild-" subpath))
 

diff --git a/src-cljs/cljsbuild_ui/config.cljs → src-cljs/cuttle/config.cljs b/src-cljs/cljsbuild_ui/config.cljs → src-cljs/cuttle/config.cljs
@@ -1,7 +1,7 @@
-(ns cljsbuild-ui.config
+(ns cuttle.config
   (:require
     [clojure.walk :refer [keywordize-keys]]
-    [cljsbuild-ui.util :refer [file-exists? js-log log]]))
+    [cuttle.util :refer [file-exists? js-log log]]))
 
 ;;------------------------------------------------------------------------------
 ;; Config File

diff --git a/src-cljs/cljsbuild_ui/core.cljs → src-cljs/cuttle/core.cljs b/src-cljs/cljsbuild_ui/core.cljs → src-cljs/cuttle/core.cljs
@@ -1,17 +1,17 @@
-(ns cljsbuild-ui.core
+(ns cuttle.core
   (:require-macros
     [cljs.core.async.macros :refer [go]]
     [hiccups.core :as hiccups])
   (:require
     [cljs.core.async :refer [<!]]
-    [cljsbuild-ui.config :refer [app-data-path]]
-    [cljsbuild-ui.dom :refer [by-id hide-el! set-html! show-el!]]
-    [cljsbuild-ui.exec :refer [add-lein-profile!
+    [cuttle.config :refer [app-data-path]]
+    [cuttle.dom :refer [by-id hide-el! set-html! show-el!]]
+    [cuttle.exec :refer [add-lein-profile!
                                kill-all-leiningen-instances!
                                correct-java-installed?]]
-    [cljsbuild-ui.pages.main :as main-page]
-    [cljsbuild-ui.projects :refer [load-workspace!]]
-    [cljsbuild-ui.util :refer [file-exists?]]
+    [cuttle.pages.main :as main-page]
+    [cuttle.projects :refer [load-workspace!]]
+    [cuttle.util :refer [file-exists?]]
     hiccups.runtime))
 
 (enable-console-print!)

diff --git a/src-cljs/cljsbuild_ui/dom.cljs → src-cljs/cuttle/dom.cljs b/src-cljs/cljsbuild_ui/dom.cljs → src-cljs/cuttle/dom.cljs
@@ -1,6 +1,6 @@
-(ns cljsbuild-ui.dom
+(ns cuttle.dom
   (:require
-    [cljsbuild-ui.util :refer [js-log log]]))
+    [cuttle.util :refer [js-log log]]))
 
 ;;------------------------------------------------------------------------------
 ;; DOM Helper Functions

diff --git a/src-cljs/cljsbuild_ui/exec.cljs → src-cljs/cuttle/exec.cljs b/src-cljs/cljsbuild_ui/exec.cljs → src-cljs/cuttle/exec.cljs
@@ -1,12 +1,12 @@
-(ns cljsbuild-ui.exec
+(ns cuttle.exec
   (:require-macros
     [cljs.core.async.macros :refer [go]])
   (:require
     [cljs.reader :refer [read-string]]
     [clojure.string :refer [join replace split-lines split trim]]
     [cljs.core.async :refer [chan close! put!]]
-    [cljsbuild-ui.config :refer [config]]
-    [cljsbuild-ui.util :refer [file-exists? js-log log on-windows? path-join uuid]]))
+    [cuttle.config :refer [config]]
+    [cuttle.util :refer [file-exists? js-log log on-windows? path-join uuid]]))
 
 (declare extract-target-from-start-msg parse-java-version)
 

diff --git a/src-cljs/cljsbuild_ui/pages/main.cljs → src-cljs/cuttle/pages/main.cljs b/src-cljs/cljsbuild_ui/pages/main.cljs → src-cljs/cuttle/pages/main.cljs
@@ -1,19 +1,19 @@
-(ns cljsbuild-ui.pages.main
+(ns cuttle.pages.main
   (:require-macros
     [cljs.core.async.macros :refer [go]])
   (:require
     [cljs.core.async :refer [<!]]
     [clojure.string :refer [blank? join replace]]
     [clojure.walk :refer [keywordize-keys]]
-    [quiescent :include-macros true]
-    [sablono.core :as sablono :include-macros true]
-    [cljsbuild-ui.config :refer [app-data-path config]]
-    [cljsbuild-ui.dom :refer [by-id hide-el! show-el!]]
-    [cljsbuild-ui.exec :as exec]
-    [cljsbuild-ui.projects :as projects :refer [load-project-file]]
-    [cljsbuild-ui.util :refer [date-format file-exists? homedir log js-log now
+    [cuttle.config :refer [app-data-path config]]
+    [cuttle.dom :refer [by-id hide-el! show-el!]]
+    [cuttle.exec :as exec]
+    [cuttle.projects :as projects :refer [load-project-file]]
+    [cuttle.util :refer [date-format file-exists? homedir log js-log now
                                on-mac? uuid write-file-async!]
-                       :refer-macros [while-let]]))
+                       :refer-macros [while-let]]
+    [quiescent :include-macros true]
+    [sablono.core :as sablono :include-macros true]))
 
 (def ipc (js/require "ipc"))
 (def open (js/require "open"))

diff --git a/src-cljs/cljsbuild_ui/projects.cljs → src-cljs/cuttle/projects.cljs b/src-cljs/cljsbuild_ui/projects.cljs → src-cljs/cuttle/projects.cljs
@@ -1,13 +1,13 @@
-(ns cljsbuild-ui.projects
+(ns cuttle.projects
   (:require-macros
     [cljs.core.async.macros :refer [go]])
   (:require
     [cljs.core.async :refer [<! put! close! chan]]
-    [clojure.string :refer [replace]]
     [cljs.reader :refer [read-string]]
-    [cljsbuild-ui.cljsbuild.config :refer [extract-options]]
-    [cljsbuild-ui.exec :refer [get-cljsbuild-with-profiles]]
-    [cljsbuild-ui.util :refer [file-exists? js-log log path-join path-dirname]]))
+    [clojure.string :refer [replace]]
+    [cuttle.cljsbuild.config :refer [extract-options]]
+    [cuttle.exec :refer [get-cljsbuild-with-profiles]]
+    [cuttle.util :refer [file-exists? js-log log path-join path-dirname]]))
 
 (def fs (js/require "fs"))
 

diff --git a/src-cljs/cljsbuild_ui/util.clj → src-cljs/cuttle/util.clj b/src-cljs/cljsbuild_ui/util.clj → src-cljs/cuttle/util.clj
@@ -1,8 +1,9 @@
-(ns cljsbuild-ui.util)
+(ns cuttle.util)
 
 ;; https://github.com/markmandel/while-let
 (defmacro while-let
-  "Repeatedly executes body while test expression is true, evaluating the body with binding-form bound to the value of test."
+  "Repeatedly executes body while test expression is true, evaluating the body
+   with binding-form bound to the value of test."
   [bindings & body]
   (let [form (first bindings) test (second bindings)]
     `(loop [~form ~test]

diff --git a/src-cljs/cljsbuild_ui/util.cljs → src-cljs/cuttle/util.cljs b/src-cljs/cljsbuild_ui/util.cljs → src-cljs/cuttle/util.cljs
@@ -1,4 +1,4 @@
-(ns cljsbuild-ui.util)
+(ns cuttle.util)
 
 ;;------------------------------------------------------------------------------
 ;; Node Modules