summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--ice-9/ChangeLog4
-rw-r--r--ice-9/emacs.scm2
2 files changed, 5 insertions, 1 deletions
diff --git a/ice-9/ChangeLog b/ice-9/ChangeLog
index c4e6daaed..42a9cac00 100644
--- a/ice-9/ChangeLog
+++ b/ice-9/ChangeLog
@@ -1,5 +1,9 @@
Thu Aug 14 19:55:37 1997 Mikael Djurfeldt <mdj@mdj.nada.kth.se>
+ * 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).
+
* slib.scm (slib:load): Use load-from-path instead of
primitive-load-path so that backtraces get narrowed properly at
the top.
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 ()