diff options
author | Mikael Djurfeldt <djurfeldt@nada.kth.se> | 1997-08-14 19:23:13 +0000 |
---|---|---|
committer | Mikael Djurfeldt <djurfeldt@nada.kth.se> | 1997-08-14 19:23:13 +0000 |
commit | db75135d74e48a19aa91083dc50b15a06a1bcda0 (patch) | |
tree | d4667a73c2bf62943c73f29b0ff737c9e526495d /ice-9/emacs.scm | |
parent | 096d5f90c3f227966e68d8b6a2d87d36b6a01028 (diff) | |
download | guile-db75135d74e48a19aa91083dc50b15a06a1bcda0.tar.gz |
* emacs.scm (emacs-load): Something has changed in the reader so
that we now should set the port line count to the specified value
(linum) instead of (- linum 1).
Diffstat (limited to 'ice-9/emacs.scm')
-rw-r--r-- | ice-9/emacs.scm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/ice-9/emacs.scm b/ice-9/emacs.scm index 77c62241a..ba616665e 100644 --- a/ice-9/emacs.scm +++ b/ice-9/emacs.scm @@ -125,7 +125,7 @@ (define (emacs-load filename linum) (set-port-filename! %%load-port filename) - (set-port-line! %%load-port (- linum 1)) + (set-port-line! %%load-port linum) (set-port-column! %%load-port 0) (lazy-catch #t (lambda () |