mirror/guile
mirror/guile
1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-06-17 09:10:22 +02:00
Code Activity

* emacs.scm (emacs-load): Something has changed in the reader so

Browse source 
that we now should set the port line count to the specified value
(linum) instead of (- linum 1).
This commit is contained in:
Mikael Djurfeldt 1997-08-14 19:23:13 +00:00
parent 096d5f90c3
commit db75135d74
2 changed files with 5 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

2
ice-9/emacs.scm
View file

@ -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 ()