summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorSean Whitton <spwhitton@spwhitton.name>2015-11-22 11:25:27 -0700
committerSean Whitton <spwhitton@spwhitton.name>2015-11-22 11:25:27 -0700
commit14dacc7e1be4135a8a875fb3a544cf56e3959481 (patch)
treef55c4ae264893d4d23eccfd799c3ae38c7b7e145
parentb3349208a0036c68aa2f7192337f095ee8d0d4b5 (diff)
downloaddotfiles-14dacc7e1be4135a8a875fb3a544cf56e3959481.tar.gz
update fmr-sync-doc Emacs functionality
-rw-r--r--.emacs.d/init-org.el9
-rwxr-xr-xbin/madocsync13
-rwxr-xr-xbin/remdocsync14
3 files changed, 16 insertions, 20 deletions
diff --git a/.emacs.d/init-org.el b/.emacs.d/init-org.el
index b9491c31..1ee3b1dd 100644
--- a/.emacs.d/init-org.el
+++ b/.emacs.d/init-org.el
@@ -78,10 +78,7 @@ spaces in it and to remove any colons."
(yas-next-field)))
(defun spw/fmr-sync-doc ()
- "Perform `mr sync' command in ~/doc.
-
-When run on the MetaArray, revert all buffers because Emacs doesn't
-manage to do this by itself on the MetaArray alone."
+ "Perform `mr sync' command in ~/doc."
(interactive)
(org-save-all-org-buffers)
(let ((default-directory (expand-file-name "~/doc/"))
@@ -89,9 +86,7 @@ manage to do this by itself on the MetaArray alone."
(with-current-buffer buffer
(delete-region (point-min) (point-max)))
(display-buffer "*mr sync*")
- (async-shell-command "madocsync" "*mr sync*"))
- (when (string= (system-name) "ma.sdf.org")
- (org-revert-all-org-buffers)))
+ (async-shell-command "remdocsync" "*mr sync*")))
diff --git a/bin/madocsync b/bin/madocsync
deleted file mode 100755
index 96b00052..00000000
--- a/bin/madocsync
+++ /dev/null
@@ -1,13 +0,0 @@
-#!/bin/sh
-
-. $HOME/.shenv
-
-if [ "$(hostname -f)" = "ma.sdf.org" ]; then
- cd $HOME/doc
- mr sync
-else
- # ssh already passes argument through `/bin/sh -c'
- ssh ma 'cd $HOME/doc && . $HOME/.shenv && mr sync'
- cd $HOME/doc
- mr sync
-fi
diff --git a/bin/remdocsync b/bin/remdocsync
new file mode 100755
index 00000000..45214b58
--- /dev/null
+++ b/bin/remdocsync
@@ -0,0 +1,14 @@
+#!/bin/sh
+
+. $HOME/.shenv
+
+if [ "$(hostname -f)" = "athena.silentflame.com" ]; then
+ cd $HOME/doc
+ mr sync
+else
+ # ssh already passes argument through `/bin/sh -c'
+ ssh athena 'cd $HOME/doc && . $HOME/.shenv && mr sync'
+ cd $HOME/doc
+ mr sync
+ ssh athena 'cd $HOME/doc && . $HOME/.shenv && mr sync'
+fi