diff options
| author | Jay Belanger <jay.p.belanger@gmail.com> | 2009-07-06 00:11:09 +0000 |
|---|---|---|
| committer | Jay Belanger <jay.p.belanger@gmail.com> | 2009-07-06 00:11:09 +0000 |
| commit | e4a5a3079bcca5dadb280a95a1c2f451cfd3fadf (patch) | |
| tree | 9b13d49ab3275c81ae5c7c08264d250c1248a860 /lisp/calc/calc-embed.el | |
| parent | 4b8b1ec5b0231e2140ad136f97321b7dd523624b (diff) | |
| download | emacs-e4a5a3079bcca5dadb280a95a1c2f451cfd3fadf.tar.gz emacs-e4a5a3079bcca5dadb280a95a1c2f451cfd3fadf.tar.bz2 emacs-e4a5a3079bcca5dadb280a95a1c2f451cfd3fadf.zip | |
(calc-embedded-make-info): Don't force when `calc-embedded-word' is
called twice.
Diffstat (limited to 'lisp/calc/calc-embed.el')
| -rw-r--r-- | lisp/calc/calc-embed.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/calc/calc-embed.el b/lisp/calc/calc-embed.el index 1f84bb66412..ed8734a28bf 100644 --- a/lisp/calc/calc-embed.el +++ b/lisp/calc/calc-embed.el @@ -821,7 +821,7 @@ The command \\[yank] can retrieve it from there." calc-embed-outer-top calc-embed-outer-bot) (let* ((bufentry (assq (current-buffer) calc-embedded-active)) (found bufentry) - (force (and fresh calc-embed-top)) + (force (and fresh calc-embed-top (null (equal calc-embed-top '(t))))) (fixed calc-embed-top) (new-info nil) info str) |