diff options
| author | Richard M. Stallman | 1994-08-17 01:45:45 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 1994-08-17 01:45:45 +0000 |
| commit | c1033e008cdc1c772201c67893dd34fc87ca9240 (patch) | |
| tree | fd6072dfeae1515794ecb162370f5bca99518137 | |
| parent | 95e4d53630f2f96e9f07a561aa214fbbd04f11ea (diff) | |
| download | emacs-c1033e008cdc1c772201c67893dd34fc87ca9240.tar.gz emacs-c1033e008cdc1c772201c67893dd34fc87ca9240.zip | |
(perl-indent-command): Fix backwards conditional.
| -rw-r--r-- | lisp/progmodes/perl-mode.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/progmodes/perl-mode.el b/lisp/progmodes/perl-mode.el index 14ee573ecb1..707ec7d034f 100644 --- a/lisp/progmodes/perl-mode.el +++ b/lisp/progmodes/perl-mode.el | |||
| @@ -319,7 +319,7 @@ possible action from the following list: | |||
| 319 | (if arg ; If arg, just indent this line | 319 | (if arg ; If arg, just indent this line |
| 320 | (perl-indent-line "\f") | 320 | (perl-indent-line "\f") |
| 321 | (if (and (not perl-tab-always-indent) | 321 | (if (and (not perl-tab-always-indent) |
| 322 | (<= (current-column) (current-indentation))) | 322 | (> (current-column) (current-indentation))) |
| 323 | (insert-tab) | 323 | (insert-tab) |
| 324 | (let (bof lsexp delta (oldpnt (point))) | 324 | (let (bof lsexp delta (oldpnt (point))) |
| 325 | (beginning-of-line) | 325 | (beginning-of-line) |