mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-01-30 04:10:54 -08:00
Code Issues Projects Releases Wiki Activity

(perl-comment-indent): Make extra space only when

Browse source 
not at beginning of line.
This commit is contained in:
Richard M. Stallman 1995-04-11 03:00:04 +00:00
parent bf47de8e06
commit 012733b38e
1 changed files with 5 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

7
lisp/progmodes/perl-mode.el
View file

@ -3,6 +3,7 @@
;; Copyright (C) 1990, 1994 Free Software Foundation, Inc.
;; Author: William F. Mann
;; Maintainer: FSF
;; Adapted-By: ESR
;; Keywords: languages
@ -282,8 +283,10 @@ Turning on Perl mode runs the normal hook `perl-mode-hook'."
0 ;Existing comment at bol stays there.
(save-excursion
(skip-chars-backward " \t")
(max (1+ (current-column)) ;Else indent at comment column
comment-column)))) ; except leave at least one space.
(max (if (bolp) ;Else indent at comment column
0 ; except leave at least one space if
(1+ (current-column))) ; not at beginning of line.
comment-column))))
(defun electric-perl-terminator (arg)
"Insert character and adjust indentation.