Mercurial > emacs
changeset 58657:05cfe246ec8d
Add a provide statement.
(calc-Need-calc-graph): Remove it.
(calc-gnuplot-name, calc-gnuplot-plot-command, calc-gnuplot-print):
Give them values.
| author | Jay Belanger <jay.p.belanger@gmail.com> |
|---|---|
| date | Tue, 30 Nov 2004 17:10:43 +0000 |
| parents | c60e5eef3cde |
| children | 8564d764ff4d |
| files | lisp/calc/calc-graph.el |
| diffstat | 1 files changed, 12 insertions(+), 5 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/calc/calc-graph.el Tue Nov 30 17:10:06 2004 +0000 +++ b/lisp/calc/calc-graph.el Tue Nov 30 17:10:43 2004 +0000 @@ -27,16 +27,21 @@ ;;; Code: ;; This file is autoloaded from calc-ext.el. + (require 'calc-ext) - (require 'calc-macs) -(defun calc-Need-calc-graph () nil) - - ;;; Graphics -;;; Note that some of the following initial values also occur in calc.el. +(defvar calc-gnuplot-name "gnuplot" + "*Name of GNUPLOT program, for calc-graph features.") + +(defvar calc-gnuplot-plot-command nil + "*Name of command for displaying GNUPLOT output; %s = file name to print.") + +(defvar calc-gnuplot-print-command "lp %s" + "*Name of command for printing GNUPLOT output; %s = file name to print.") + (defvar calc-gnuplot-tempfile "calc") (defvar calc-gnuplot-default-device) @@ -1472,5 +1477,7 @@ (goto-char (point-max)) (insert "\n")))))) +(provide 'calc-graph) + ;;; arch-tag: e4b06a52-c386-4d54-a2bb-7c0a0ef533c2 ;;; calc-graph.el ends here