summaryrefslogtreecommitdiff
path: root/lisp/calc
diff options
context:
space:
mode:
authorJay Belanger <jay.p.belanger@gmail.com>2005-02-01 03:57:08 +0000
committerJay Belanger <jay.p.belanger@gmail.com>2005-02-01 03:57:08 +0000
commit0a18efee864b73dca2f1463a6c753cc33fc99e03 (patch)
treea00659f90da07156c0380cc2f0af28dc3673582f /lisp/calc
parentd4d668071e1fd8f50d2c70e6b300cfd0d2fb0e3b (diff)
downloademacs-0a18efee864b73dca2f1463a6c753cc33fc99e03.tar.gz
emacs-0a18efee864b73dca2f1463a6c753cc33fc99e03.tar.bz2
emacs-0a18efee864b73dca2f1463a6c753cc33fc99e03.zip
(calc-embedded-find-bounds): Set formula bound on line with formula.
Diffstat (limited to 'lisp/calc')
-rw-r--r--lisp/calc/calc-embed.el2
1 files changed, 2 insertions, 0 deletions
diff --git a/lisp/calc/calc-embed.el b/lisp/calc/calc-embed.el
index 080d48f2062..4c6311c9a5b 100644
--- a/lisp/calc/calc-embed.el
+++ b/lisp/calc/calc-embed.el
@@ -417,6 +417,8 @@ With any prefix argument, marks only the formula itself."
(forward-char -1))
(setq calc-embed-outer-top (point))
(goto-char (match-end 0))
+ (if (looking-at "[ \t]*$")
+ (end-of-line))
(if (eq (following-char) ?\n)
(forward-char 1))
(or (bolp)