/[emacs]/emacs/lisp/calc/calc-store.el
ViewVC logotype

Diff of /emacs/lisp/calc/calc-store.el

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.11 by jpb, Fri Dec 31 20:36:48 2004 UTC revision 1.12 by jpb, Sun Jan 2 06:48:58 2005 UTC
# Line 397  Line 397 
397           (setq calc-last-edited-variable var)           (setq calc-last-edited-variable var)
398           (calc-edit-mode (list 'calc-finish-stack-edit (list 'quote var))           (calc-edit-mode (list 'calc-finish-stack-edit (list 'quote var))
399                           t                           t
400                           (concat "Editing " (calc-var-name var)))                           (concat "Editing variable `" (calc-var-name var) "'. "))
401           (and value           (and value
402                (insert (math-format-nice-expr value (frame-width)) "\n")))))                (insert (math-format-nice-expr value (frame-width)) "\n")))))
403    (calc-show-edit-buffer))    (calc-show-edit-buffer))

Legend:
Removed from v.1.11  
changed lines
  Added in v.1.12

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26