From: Don Armstrong Date: Mon, 28 Mar 2016 21:31:02 +0000 (-0700) Subject: save buffer excursion after eval X-Git-Url: https://git.donarmstrong.com/?a=commitdiff_plain;h=571246bb4628feb83035ea974761c99fdda629a2;p=bin.git save buffer excursion after eval --- diff --git a/eval_r b/eval_r index 5714c52..c3c72a3 100755 --- a/eval_r +++ b/eval_r @@ -6,12 +6,14 @@ trap "rm -f '$TMP'/file; rmdir '$TMP'" EXIT cat - > "$TMP"/file; -( emacsclient -s R --eval "(with-temp-buffer (insert-file-contents \"$TMP/file\") +( emacsclient -s R -n --eval "(save-window-excursion +(save-excursion +(save-current-buffer +(with-temp-buffer (insert-file-contents \"$TMP/file\") (setq ess-eval-visibly t) -(setq ess-eval-visibly-p t) (setq ess-language \"R\") (setq ess-dialect \"R\") -(ess-eval-region (point-min) (point-max) nil))" >/dev/null 2>&1 & ); +(ess-eval-region (point-min) (point-max) nil )))))" >/dev/null 2>&1 & ); trap - EXIT; ( sleep 2s;