diff options
| author | Stefan Monnier <monnier@iro.umontreal.ca> | 2009-10-28 18:35:33 +0000 |
|---|---|---|
| committer | Stefan Monnier <monnier@iro.umontreal.ca> | 2009-10-28 18:35:33 +0000 |
| commit | 6df9b6d78f82589af80c70bf1f027a275383a40c (patch) | |
| tree | 7f30e3d88edf7d76d68d1fbfb2e6976f9e58f4d4 /lisp/calc/calc-ext.el | |
| parent | 6e3da0ae024a0ebedc87b511f124f2a975932162 (diff) | |
* calc/calc.el (calc, calc-refresh, calc-trail-buffer, calc-record)
(calcDigit-nondigit):
* calc/calc-yank.el (calc-copy-to-buffer):
* calc/calc-units.el (calc-invalidate-units-table):
* calc/calc-trail.el (calc-trail-yank):
* calc/calc-store.el (calc-insert-variables):
* calc/calc-rewr.el (math-rewrite, math-rewrite-phase):
* calc/calc-prog.el (calc-read-parse-table):
* calc/calc-keypd.el (calc-do-keypad, calc-keypad-right-click):
* calc/calc-help.el (calc-describe-bindings, calc-describe-key):
* calc/calc-graph.el (calc-graph-delete, calc-graph-add-curve)
(calc-graph-juggle, calc-graph-count-curves, calc-graph-plot)
(calc-graph-plot, calc-graph-format-data, calc-graph-set-styles)
(calc-graph-name, calc-graph-find-command, calc-graph-view)
(calc-graph-view, calc-gnuplot-command, calc-graph-init):
* calc/calc-ext.el (calc-realign):
* calc/calc-embed.el (calc-do-embedded, calc-do-embedded)
(calc-embedded-finish-edit, calc-embedded-make-info)
(calc-embedded-finish-command, calc-embedded-stack-change):
* calc/calc-aent.el (calcAlg-enter): Use with-current-buffer.
Diffstat (limited to 'lisp/calc/calc-ext.el')
| -rw-r--r-- | lisp/calc/calc-ext.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/calc/calc-ext.el b/lisp/calc/calc-ext.el index 55204b045c..80899e78ca 100644 --- a/lisp/calc/calc-ext.el +++ b/lisp/calc/calc-ext.el @@ -1677,8 +1677,8 @@ calc-kill calc-kill-region calc-yank)))) (eq (current-buffer) (aref calc-embedded-info 0))) (progn (goto-char (aref calc-embedded-info 2)) - (if (save-excursion (set-buffer (aref calc-embedded-info 1)) - calc-show-plain) + (if (with-current-buffer (aref calc-embedded-info 1) + calc-show-plain) (forward-line 1))) (calc-wrapper (if (get-buffer-window (current-buffer)) |