aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorTino Calancha2016-08-23 22:38:48 +0900
committerTino Calancha2016-08-23 22:38:48 +0900
commitf345fdd7e64064194a9235406971f62b9da09ae2 (patch)
tree8f4c1534f00661089fee6c3e9216d0b477b09a88
parentc325e199668a2449a9b0d662e114eec9d4802288 (diff)
downloademacs-f345fdd7e64064194a9235406971f62b9da09ae2.tar.gz
emacs-f345fdd7e64064194a9235406971f62b9da09ae2.zip
call-process instead of call-process-region with empty region
* lisp/calc/calc-graph.el (calc-graph-show-tty): Use call-process and shell-command-switch.
-rw-r--r--lisp/calc/calc-graph.el6
1 files changed, 3 insertions, 3 deletions
diff --git a/lisp/calc/calc-graph.el b/lisp/calc/calc-graph.el
index 3dedbbc434a..6357c97a0b2 100644
--- a/lisp/calc/calc-graph.el
+++ b/lisp/calc/calc-graph.el
@@ -908,9 +908,9 @@
908(defun calc-graph-show-tty (output) 908(defun calc-graph-show-tty (output)
909 "Default calc-gnuplot-plot-command for \"tty\" output mode. 909 "Default calc-gnuplot-plot-command for \"tty\" output mode.
910This is useful for tek40xx and other graphics-terminal types." 910This is useful for tek40xx and other graphics-terminal types."
911 (call-process-region 1 1 shell-file-name 911 (call-process shell-file-name nil calc-gnuplot-buffer nil
912 nil calc-gnuplot-buffer nil 912 shell-command-switch
913 "-c" (format "cat %s >/dev/tty; rm %s" output output))) 913 (format "cat %s >/dev/tty; rm %s" output output)))
914 914
915(defvar calc-dumb-map nil 915(defvar calc-dumb-map nil
916 "The keymap for the \"dumb\" terminal plot.") 916 "The keymap for the \"dumb\" terminal plot.")