# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 777087945 0
# Node ID 121cdea468307fa44993ccbd9ef2203069a7c65a
# Parent  d884e74c75e4af6924cf54ad7b642579c94931d8
(perl-indent-command): Fix backwards conditional.

diff -r d884e74c75e4 -r 121cdea46830 lisp/progmodes/perl-mode.el
--- a/lisp/progmodes/perl-mode.el	Tue Aug 16 23:51:52 1994 +0000
+++ b/lisp/progmodes/perl-mode.el	Wed Aug 17 01:45:45 1994 +0000
@@ -319,7 +319,7 @@
   (if arg				; If arg, just indent this line
       (perl-indent-line "\f")
     (if (and (not perl-tab-always-indent)
-	     (<= (current-column) (current-indentation)))
+	     (> (current-column) (current-indentation)))
 	(insert-tab)
       (let (bof lsexp delta (oldpnt (point)))
 	(beginning-of-line)