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.

diff --git a/lisp/calc/calc-graph.el b/lisp/calc/calc-graph.el
index 3dedbbc434a02714be098fdf34e465793e999f55..6357c97a0b2982c61bf63218dac68e9d37b7fa91 100644 (file)
--- a/lisp/calc/calc-graph.el
+++ b/lisp/calc/calc-graph.el
@@ -908,9 +908,9 @@
 (defun calc-graph-show-tty (output)
   "Default calc-gnuplot-plot-command for \"tty\" output mode.
 This is useful for tek40xx and other graphics-terminal types."
-  (call-process-region 1 1 shell-file-name
-                      nil calc-gnuplot-buffer nil
-                      "-c" (format "cat %s >/dev/tty; rm %s" output output)))
+  (call-process shell-file-name nil calc-gnuplot-buffer nil
+                shell-command-switch
+                (format "cat %s >/dev/tty; rm %s" output output)))
 
 (defvar calc-dumb-map nil
   "The keymap for the \"dumb\" terminal plot.")