Mercurial > emacs
changeset 62837:25c14cb8be15
(calc-embedded-make-info): When selecting region with positive prefix
argument, use end of line instead of beginning of next line.
| author | Jay Belanger <jay.p.belanger@gmail.com> |
|---|---|
| date | Sat, 28 May 2005 05:05:55 +0000 |
| parents | 4b90639651ef |
| children | 54f49aea9167 |
| files | lisp/calc/calc-embed.el |
| diffstat | 1 files changed, 3 insertions(+), 0 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/calc/calc-embed.el Sat May 28 04:41:46 2005 +0000 +++ b/lisp/calc/calc-embed.el Sat May 28 05:05:55 2005 +0000 @@ -816,6 +816,9 @@ (aset info 3 (copy-marker (region-end)))) (aset info (if (> calc-embed-arg 0) 2 3) (point-marker)) (forward-line calc-embed-arg) + (when (> calc-embed-arg 0) + (forward-line -1) + (end-of-line)) (aset info (if (> calc-embed-arg 0) 3 2) (point-marker))) (aset info 4 (copy-marker (aref info 2))) (aset info 5 (copy-marker (aref info 3))))