From f1e8797a66f5245192ef1473fbc0a99ebe23f5bc Mon Sep 17 00:00:00 2001
From: Tom Willemse
Date: Sun, 2 Jun 2013 00:00:27 +0200
Subject: Add control command for easy starting/reloading

---
 .gitignore  |  2 ++
 scrumeloctl | 63 +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
 2 files changed, 65 insertions(+)
 create mode 100755 scrumeloctl

diff --git a/.gitignore b/.gitignore
index d5bd7c0..74f6160 100644
--- a/.gitignore
+++ b/.gitignore
@@ -1,3 +1,5 @@
 *.org
 !README.org
 *.elc
+emacs.scrumelo.d/
+.emacs.desktop*
diff --git a/scrumeloctl b/scrumeloctl
new file mode 100755
index 0000000..7d5ff33
--- /dev/null
+++ b/scrumeloctl
@@ -0,0 +1,63 @@
+#!/bin/sh
+
+# Based on emacs-boot.sh by Nic Ferrier, as found here:
+# https://gist.github.com/nicferrier/5688473
+
+NAME=scrumelo
+CWD="$(cd $(dirname $0); pwd)"
+EMACSBIN=/usr/bin/emacs
+EMACSCLIENT="/usr/bin/emacsclient -s /tmp/emacs$UID/$NAME"
+EMACSD="$XDG_CONFIG_HOME"/emacs."$NAME".d
+[ -d "$EMACSD" ] || mkdir "$EMACSD"
+[ -f "$EMACSD"/init.el ] || cat <<EOF > "$EMACSD"/init.el
+(setq user-emacs-directory "$EMACSD")
+(setq package-archives
+      '(("gnu" . "http://elpa.gnu.org/packages/")
+        ("marmalade" . "http://marmalade-repo.org/packages/")))
+(package-initialize)
+(package-refresh-contents)
+(unless (package-installed-p 'elnode)
+  (package-install 'elnode))
+(unless (package-installed-p 'esxml)
+  (package-install 'esxml))
+EOF
+
+function report() {
+    if [ $? -eq 0 ]; then echo "$1"; else echo "$2"; fi
+}
+
+case "$1" in
+    start)
+        $EMACSBIN -Q --daemon=$NAME -l "$EMACSD"/init.el >/dev/null
+        if [ $? -eq 0 ]; then
+            $EMACSCLIENT -e "(load \"$CWD/scrumelo.el\")"
+            report Done "Failed: couldn't start elnode"
+        else
+            echo "Failed: Couldn't start daemon"
+        fi
+        ;;
+    status)
+        $EMACSCLIENT -e "(ignore)" 2>/dev/null >/dev/null
+        report Running... Stopped...
+        ;;
+    client)
+        $EMACSCLIENT -c
+        ;;
+    install)
+        shift
+        $EMACSCLIENT -e "(package-install (quote $1))"
+        ;;
+    reload)
+        $EMACSCLIENT -e "(load \"$CWD/scrumelo.el\")" >/dev/null
+        report Done Failed
+        ;;
+    stop)
+        $EMACSCLIENT -e "(kill-emacs)" 2>/dev/null >/dev/null
+        report Done Failed
+        ;;
+    *)
+        echo "Usage: $0 (start|status|client|reload|stop)"
+        echo "Or:    $0 install <module>"
+        exit 1
+        ;;
+esac
-- 
cgit v1.2.3-54-g00ecf