[Emacs-diffs] Changes to emacs/lisp/calc/calc-graph.el [lexbind]

[Miles Bader]

Index: emacs/lisp/calc/calc-graph.el
diff -c emacs/lisp/calc/calc-graph.el:1.5.2.5 
emacs/lisp/calc/calc-graph.el:1.5.2.6
*** emacs/lisp/calc/calc-graph.el:1.5.2.5       Wed Dec  8 23:31:43 2004
--- emacs/lisp/calc/calc-graph.el       Wed Dec  8 23:36:21 2004
***************
*** 3,10 ****
  ;; Copyright (C) 1990, 1991, 1992, 1993, 2001 Free Software Foundation, Inc.
  
  ;; Author: David Gillespie <address@hidden>
! ;; Maintainers: D. Goel <address@hidden>
! ;;              Colin Walters <address@hidden>
  
  ;; This file is part of GNU Emacs.
  
--- 3,9 ----
  ;; Copyright (C) 1990, 1991, 1992, 1993, 2001 Free Software Foundation, Inc.
  
  ;; Author: David Gillespie <address@hidden>
! ;; Maintainer: Jay Belanger <address@hidden>
  
  ;; This file is part of GNU Emacs.
  
***************
*** 28,57 ****
  ;;; 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-tempfile "calc")
  
! (defvar calc-gnuplot-default-device "default")
! (defvar calc-gnuplot-default-output "STDOUT")
! (defvar calc-gnuplot-print-device "postscript")
! (defvar calc-gnuplot-print-output "auto")
  (defvar calc-gnuplot-keep-outfile nil)
  (defvar calc-gnuplot-version nil)
  
  (defvar calc-gnuplot-display (getenv "DISPLAY"))
! (defvar calc-gnuplot-geometry nil)
  
! (defvar calc-graph-default-resolution 15)
! (defvar calc-graph-default-resolution-3d 5)
  (defvar calc-graph-default-precision 5)
  
  (defvar calc-gnuplot-buffer nil)
--- 27,61 ----
  ;;; Code:
  
  ;; This file is autoloaded from calc-ext.el.
  
+ (require 'calc-ext)
  (require 'calc-macs)
  
! ;;; Graphics
! 
! (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)
! (defvar calc-gnuplot-default-output)
! (defvar calc-gnuplot-print-device)
! (defvar calc-gnuplot-print-output)
  (defvar calc-gnuplot-keep-outfile nil)
  (defvar calc-gnuplot-version nil)
  
  (defvar calc-gnuplot-display (getenv "DISPLAY"))
! (defvar calc-gnuplot-geometry)
  
! (defvar calc-graph-default-resolution)
! (defvar calc-graph-default-resolution-3d)
  (defvar calc-graph-default-precision 5)
  
  (defvar calc-gnuplot-buffer nil)
***************
*** 1473,1477 ****
--- 1477,1483 ----
            (goto-char (point-max))
            (insert "\n"))))))
  
+ (provide 'calc-graph)
+ 
  ;;; arch-tag: e4b06a52-c386-4d54-a2bb-7c0a0ef533c2
  ;;; calc-graph.el ends here