From mboxrd@z Thu Jan 1 00:00:00 1970 Path: main.gmane.org!not-for-mail From: "Stefan Monnier" Newsgroups: gmane.emacs.help Subject: Re: Tab stops in perl mode broken? Date: 21 May 2003 12:22:27 -0400 Organization: Yale University Sender: help-gnu-emacs-bounces+gnu-help-gnu-emacs=m.gmane.org@gnu.org Message-ID: <5lptmcmfr0.fsf@rum.cs.yale.edu> References: NNTP-Posting-Host: main.gmane.org Mime-Version: 1.0 Content-Type: text/plain; charset=us-ascii X-Trace: main.gmane.org 1053536903 8108 80.91.224.249 (21 May 2003 17:08:23 GMT) X-Complaints-To: usenet@main.gmane.org NNTP-Posting-Date: Wed, 21 May 2003 17:08:23 +0000 (UTC) Original-X-From: help-gnu-emacs-bounces+gnu-help-gnu-emacs=m.gmane.org@gnu.org Wed May 21 19:08:21 2003 Return-path: Original-Received: from monty-python.gnu.org ([199.232.76.173]) by main.gmane.org with esmtp (Exim 3.35 #1 (Debian)) id 19IX3K-0001wg-00 for ; Wed, 21 May 2003 19:06:58 +0200 Original-Received: from localhost ([127.0.0.1] helo=monty-python.gnu.org) by monty-python.gnu.org with esmtp (Exim 4.20) id 19IX1i-000792-Td for gnu-help-gnu-emacs@m.gmane.org; Wed, 21 May 2003 13:05:18 -0400 Original-Path: shelby.stanford.edu!newsfeed.stanford.edu!logbridge.uoregon.edu!canoe.uoregon.edu!news.wss.yale.edu!rum.cs.yale.edu!rum.cs.yale.edu Original-Newsgroups: gnu.emacs.help Original-Lines: 41 Original-NNTP-Posting-Host: rum.cs.yale.edu Original-X-Trace: news.wss.yale.edu 1053534150 26541 128.36.229.169 (21 May 2003 16:22:30 GMT) Original-X-Complaints-To: news@news.wss.yale.edu Original-NNTP-Posting-Date: Wed, 21 May 2003 16:22:30 +0000 (UTC) User-Agent: Gnus/5.09 (Gnus v5.9.0) Emacs/21.3.50 X-Original-NNTP-Posting-Host: rum.cs.yale.edu X-Original-Trace: 21 May 2003 12:22:27 -0400, rum.cs.yale.edu Original-Xref: shelby.stanford.edu gnu.emacs.help:113471 Original-To: help-gnu-emacs@gnu.org X-BeenThere: help-gnu-emacs@gnu.org X-Mailman-Version: 2.1b5 Precedence: list List-Id: Users list for the GNU Emacs text editor List-Help: List-Post: List-Subscribe: , List-Archive: List-Unsubscribe: , Errors-To: help-gnu-emacs-bounces+gnu-help-gnu-emacs=m.gmane.org@gnu.org Xref: main.gmane.org gmane.emacs.help:9967 X-Report-Spam: http://spam.gmane.org/gmane.emacs.help:9967 >>>>> "Johnny" == Johnny L Wales writes: > Ok, I have this astonishingly annoying problem in perl mode. I can't get > proper indention on some lines. Check this out: > ------------ > if(defined($rqpairs{'area'})) { > print "Content-type: text/html\n\n"; > print ""; > print "Canvassing report: $rqpairs{'area'}\n"; > print ""; > print "Canvassing report for $rqpairs{'area'}
"; > $dbcmd = "SELECT count(*) FROM calls WHERE ( (outgoingnum like "; > $dbcmd .= "'P1$rqpairs{'area'}%') OR (outgoingnum like 'P0"; > $dbcmd .= "$rqpairs{'area'}\%')) "; > ($year, $month, $day) = Date::Calc::Today(); > ($o_year, $o_month, $o_day) = Date::Calc::Add_Delta_Days($year, $month, > $day, -\ > 30); > $dstr = sprintf("'%04d-%02d-%02d' AND '%04d-%02d-%02d'", > $o_year, $o_month, $o_day, $year, $month, $day); > $dbcmd .= "AND (calldate between $dstr) ORDER BY calldate;"; > $sth = $dbh -> prepare($dbcmd); > $sth->execute; > $count = $sth->fetchrow_array; > --------- I have just tried the above with `emacs-21.3 -q --no-site-file' and couldn't reproduce your problem. The ($o_year...) lines gets properly indented below the previous line. Could you show us a more complete example where the problem can be reproduced ? Stefan PS: Yes, the default perl-mode is not as sophisticated as cperl-mode. Note that the version in the Emacs repository is significantly improved in some areas (provided you use font-lock).