diff options
| author | Richard M. Stallman | 1998-06-06 22:43:31 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 1998-06-06 22:43:31 +0000 |
| commit | 556dd62982e9bb54492d7dbd4deb8e5c7091f468 (patch) | |
| tree | 8189454c9ee1309ec09d3b8893cd60b920424452 /lisp | |
| parent | 665eba9dc04fab0272b1718fa9fc469cb7b11d75 (diff) | |
| download | emacs-556dd62982e9bb54492d7dbd4deb8e5c7091f468.tar.gz emacs-556dd62982e9bb54492d7dbd4deb8e5c7091f468.zip | |
(fortran-electric-line-number): Add delete-selection property.
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/progmodes/fortran.el | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/lisp/progmodes/fortran.el b/lisp/progmodes/fortran.el index c35eadda156..ea537f011d8 100644 --- a/lisp/progmodes/fortran.el +++ b/lisp/progmodes/fortran.el | |||
| @@ -853,6 +853,7 @@ except that ] is never special and \ quotes ^, - or \." | |||
| 853 | (skip-chars-backward chars) | 853 | (skip-chars-backward chars) |
| 854 | (delete-region (point) (progn (skip-chars-forward chars) (point)))) | 854 | (delete-region (point) (progn (skip-chars-forward chars) (point)))) |
| 855 | 855 | ||
| 856 | (put 'fortran-electric-line-number 'delete-selection t) | ||
| 856 | (defun fortran-electric-line-number (arg) | 857 | (defun fortran-electric-line-number (arg) |
| 857 | "Self insert, but if part of a Fortran line number indent it automatically. | 858 | "Self insert, but if part of a Fortran line number indent it automatically. |
| 858 | Auto-indent does not happen if a numeric ARG is used." | 859 | Auto-indent does not happen if a numeric ARG is used." |