Article View: gnu.emacs.bug
Article #99884fortran mode and overwrite mode
From: castor
Date: Wed, 21 Mar 1990 10:17
Date: Wed, 21 Mar 1990 10:17
42 lines
1922 bytes
1922 bytes
Hi, I found that the "electric-line-number" function in the fortran
mode works incorrectly when in overtype mode, in that it doesn't
overtype. It still inserts. I don't really know emacs-lisp, but
was able to put together a quick fix.
Enclosed are the diffs. (My base was the fortran.el distributed in
emacs version 18.55)
-castor fu
castor@fizzle.stanford.edu
*** fortran.el Fri Mar 16 14:11:33 1990
--- fortran.el.ori Fri Mar 16 13:21:56 1990
***************
*** 397,414 ****
(point))
t)) ;not a line number
(looking-at "[0-9]")) ;within a line number
- ;; CLF attempt to support overwrite mode hack
- (if (not overwrite-mode)
- (insert last-command-char)
- (delete-char 1)
- (insert last-command-char)
- )
- (skip-chars-backward " \t")
- (if (not overwrite-mode)
- (insert last-command-char)
- (delete-char 1)
(insert last-command-char)
! )
(fortran-indent-line))))
(defun beginning-of-fortran-subprogram ()
--- 397,405 ----
(point))
t)) ;not a line number
(looking-at "[0-9]")) ;within a line number
(insert last-command-char)
! (skip-chars-backward " \t")
! (insert last-command-char)
(fortran-indent-line))))
(defun beginning-of-fortran-subprogram ()
Technical Details
Message-ID:
<9003211117.AA01503@solrt.circe.fr>Path:
arc1-ca.pugleaf.net!gmdzi!unido!fauern!ira.uka.de!snorkelwacker!tut.cis.ohio-state.edu!SOLRT.CIRCE.FR!castorShow Full Headers
Complete Article Headers
X-Google-Language: ENGLISH,ASCII-7-bit X-Google-Thread: fb2f1,1073de29136d7ebe,start X-Google-Attributes: gidfb2f1,public X-Google-ArrivalTime: 1990-03-21 11:00:37 PST Path: arc1-ca.pugleaf.net!gmdzi!unido!fauern!ira.uka.de!snorkelwacker!tut.cis.ohio-state.edu!SOLRT.CIRCE.FR!castor From: castor@SOLRT.CIRCE.FR Newsgroups: gnu.emacs.bug Subject: fortran mode and overwrite mode Message-ID: <9003211117.AA01503@solrt.circe.fr> Date: 21 Mar 90 10:17:18 GMT Sender: daemon@tut.cis.ohio-state.edu Distribution: gnu Organization: GNUs Not Usenet Lines: 42 Posted: Wed Mar 21 11:17:18 1990