(calc-embedded-find-bounds): Set formula bound on line with formula.

0a18efee · Jay Belanger · d4d66807 · 0a18efee
Commit 0a18efee authored Feb 01, 2005 by Jay Belanger
Hide whitespace changes
Inline Side-by-side

Showing with 2 additions and 0 deletions

lisp/calc/calc-embed.el lisp/calc/calc-embed.el +2 -0

No files found.
--- 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)