Mercurial > emacs
comparison lisp/calc/calcalg3.el @ 91239:2fcaae6177a5
Merge from emacs--devo--0
Revision: emacs@sv.gnu.org/emacs--unicode--0--patch-300
author | Miles Bader <miles@gnu.org> |
---|---|
date | Sun, 16 Dec 2007 05:08:49 +0000 |
parents | 53108e6cea98 e50a2e215441 |
children | 606f2d163a64 |
comparison
equal
deleted
inserted
replaced
91238:5cf14a2107b5 | 91239:2fcaae6177a5 |
---|---|
414 data)) | 414 data)) |
415 (if (consp calc-fit-to-trail) | 415 (if (consp calc-fit-to-trail) |
416 (calc-record (calc-normalize calc-fit-to-trail) "parm")))) | 416 (calc-record (calc-normalize calc-fit-to-trail) "parm")))) |
417 (when plot | 417 (when plot |
418 (if (stringp plot) | 418 (if (stringp plot) |
419 (message plot) | 419 (message "%s" plot) |
420 (let ((calc-graph-no-auto-view t)) | 420 (let ((calc-graph-no-auto-view t)) |
421 (calc-graph-delete t) | 421 (calc-graph-delete t) |
422 (calc-graph-add-curve | 422 (calc-graph-add-curve |
423 (calc-graph-lookup (nth 1 plot)) | 423 (calc-graph-lookup (nth 1 plot)) |
424 (calc-graph-lookup (nth 2 plot))) | 424 (calc-graph-lookup (nth 2 plot))) |