Article View: gnu.emacs.bug
Article #88044perl-indent-command is wrong
From: Joe Reiss
Date: Wed, 17 Aug 1994 01:00
Date: Wed, 17 Aug 1994 01:00
35 lines
2060 bytes
2060 bytes
In GNU Emacs 19.25.1 of Mon Aug 15 1994 on opus (mab-next-ns3)
There's a problem in perl-mode. According to the docs...
>If `perl-tab-always-indent' is nil and point is not in the indentation
>area at the beginning of the line, simply insert a tab.
Unfortunately, the opposite behavior is observed. Tabs are inserted
if the cursor is in the indentation, and the line is reindented if the
cursor is *after* the indentation. The fix is simple and involves
just changing a <= to a >. The patch is included below.
Thanks for emacs!
Joe
*** ../19.25/lisp/perl-mode.el Tue May 17 15:08:33 1994
--- perl-mode.el Tue Aug 16 19:44:53 1994
***************
*** 319,325 ****
(if arg ; If arg, just indent this line
(perl-indent-line "\f")
(if (and (not perl-tab-always-indent)
! (<= (current-column) (current-indentation)))
(insert-tab)
(let (bof lsexp delta (oldpnt (point)))
(beginning-of-line)
--- 319,325 ----
(if arg ; If arg, just indent this line
(perl-indent-line "\f")
(if (and (not perl-tab-always-indent)
! (> (current-column) (current-indentation)))
(insert-tab)
(let (bof lsexp delta (oldpnt (point)))
(beginning-of-line)
Technical Details
Message-ID:
<9408170057.AA00941@opus.ohio-state.edu>Path:
arc1-ca.pugleaf.net!bga.com!news.sprintlink.net!uunet!newsfeed.ACO.net!news.sztaki.hu!EU.net!howland.reston.ans.net!cs.utexas.edu!sdd.hp.com!col.hp.com!csn!magnus.acs.ohio-state.edu!cis.ohio-state.edu!opus.ohio-state.EDU!joeShow Full Headers
Complete Article Headers
X-Google-Language: ENGLISH,ASCII-7-bit X-Google-Thread: fb2f1,42bc944e906586ee,start X-Google-Attributes: gidfb2f1,public X-Google-ArrivalTime: 1994-08-16 18:20:41 PST Path: arc1-ca.pugleaf.net!bga.com!news.sprintlink.net!uunet!newsfeed.ACO.net!news.sztaki.hu!EU.net!howland.reston.ans.net!cs.utexas.edu!sdd.hp.com!col.hp.com!csn!magnus.acs.ohio-state.edu!cis.ohio-state.edu!opus.ohio-state.EDU!joe From: joe@opus.ohio-state.EDU (Joe Reiss) Newsgroups: gnu.emacs.bug Subject: perl-indent-command is wrong Date: 16 Aug 1994 21:00:32 -0400 Organization: GNUs Not Usenet Lines: 35 Sender: daemon@cis.ohio-state.edu Approved: bug-gnu-emacs@prep.ai.mit.edu Distribution: gnu Message-ID: <9408170057.AA00941@opus.ohio-state.edu>