From mboxrd@z Thu Jan 1 00:00:00 1970 Path: news.gmane.org!not-for-mail From: Andreas Marschke Newsgroups: gmane.emacs.devel Subject: Outline.el: Outlining Perl is failing in a way. Date: Wed, 2 Feb 2011 16:12:44 +0100 Message-ID: <20110202151244.GA7309@andres.andreas> NNTP-Posting-Host: lo.gmane.org Mime-Version: 1.0 Content-Type: text/plain; charset=iso-8859-1 Content-Transfer-Encoding: 8bit X-Trace: dough.gmane.org 1296672551 26840 80.91.229.12 (2 Feb 2011 18:49:11 GMT) X-Complaints-To: usenet@dough.gmane.org NNTP-Posting-Date: Wed, 2 Feb 2011 18:49:11 +0000 (UTC) To: emacs-devel@gnu.org Original-X-From: emacs-devel-bounces+ged-emacs-devel=m.gmane.org@gnu.org Wed Feb 02 19:49:07 2011 Return-path: Envelope-to: ged-emacs-devel@m.gmane.org Original-Received: from lists.gnu.org ([199.232.76.165]) by lo.gmane.org with esmtp (Exim 4.69) (envelope-from ) id 1PkhlK-0007pX-GT for ged-emacs-devel@m.gmane.org; Wed, 02 Feb 2011 19:49:06 +0100 Original-Received: from localhost ([127.0.0.1]:53949 helo=lists.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1PkhlJ-0006Jq-Og for ged-emacs-devel@m.gmane.org; Wed, 02 Feb 2011 13:49:05 -0500 Original-Received: from [140.186.70.92] (port=43793 helo=eggs.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1PkeON-0001p4-FH for emacs-devel@gnu.org; Wed, 02 Feb 2011 10:13:16 -0500 Original-Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1PkeOI-0007ow-8M for emacs-devel@gnu.org; Wed, 02 Feb 2011 10:13:11 -0500 Original-Received: from mail-fx0-f41.google.com ([209.85.161.41]:48535) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1PkeOH-0007oc-W2 for emacs-devel@gnu.org; Wed, 02 Feb 2011 10:13:06 -0500 Original-Received: by fxm12 with SMTP id 12so68140fxm.0 for ; Wed, 02 Feb 2011 07:13:04 -0800 (PST) DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=googlemail.com; s=gamma; h=domainkey-signature:date:from:to:subject:message-id:mime-version :content-type:content-disposition:content-transfer-encoding :user-agent; bh=fG6P3iryjzMK9UZzKjNgvy1e4VA7P0gsgkEiw9G4r84=; b=MoFD1Ku8TbG0azJ4pflhB9AiD8Apf8f5NXAFlVFmupJ8TzyUNLcEHXtiUJOhnd9bNr rN96a30EqZ65aEJL8cmHErfgRETuMx9qc5hNtdbMQzV0l2WRYEjmASkDlWcoJTcWR+ZP r1jrzCJgXsD5MLGNuNxyI7XqmxE6RwFhWoHAI= DomainKey-Signature: a=rsa-sha1; c=nofws; d=googlemail.com; s=gamma; h=date:from:to:subject:message-id:mime-version:content-type :content-disposition:content-transfer-encoding:user-agent; b=oJhVPjF05cJ0vrtzpdClYXZNyCHSYi9PCK1ZDNf9H3V81vRBHqx8X4IabwkLVzEEdn QRAcSRxipNgzLD7HL0MoWvG4FghXIO4W6bbfvgXaf9QBbvWxhtpqeo9Y7uwbvYXXb4Kn 9uYDUO5a3npve0oR76Y4u4eL0JBqssT51SPXU= Original-Received: by 10.223.111.137 with SMTP id s9mr5185812fap.98.1296659584672; Wed, 02 Feb 2011 07:13:04 -0800 (PST) Original-Received: from andres.andreas (p5B2A7C1E.dip.t-dialin.net [91.42.124.30]) by mx.google.com with ESMTPS id o17sm8386410fal.25.2011.02.02.07.13.02 (version=TLSv1/SSLv3 cipher=RC4-MD5); Wed, 02 Feb 2011 07:13:03 -0800 (PST) Content-Disposition: inline User-Agent: Mutt/1.5.20 (2009-06-14) X-detected-operating-system: by eggs.gnu.org: GNU/Linux 2.6 (newer, 2) X-Received-From: 209.85.161.41 X-BeenThere: emacs-devel@gnu.org X-Mailman-Version: 2.1.5 Precedence: list List-Id: "Emacs development discussions." List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Original-Sender: emacs-devel-bounces+ged-emacs-devel=m.gmane.org@gnu.org Errors-To: emacs-devel-bounces+ged-emacs-devel=m.gmane.org@gnu.org Xref: news.gmane.org gmane.emacs.devel:135475 Archived-At: Hi! I like Emacs and I like outline.el, which I frequently use. But it has a small caveat as I discovered recently. When using outline-minor-mode on perl-mode with a `sub'(perl-2-lisp:sub->defun). It happens to not fully wrap-in a function like this: -*------------------------------------------------------------------*- sub new { my ($class, %parms ) = @_; croak("Options to AptPkg::Repackage should be key/value pairs, not hash reference") if ref($_[1]) eq 'HASH'; my $name = delete $parms{name}; my $directory = delete $parms{directory}; my $verbose = delete $parms{verbose}; $verbose = 0 unless defined $verbose; print "Build-directory is: ".$directory."\n" if $verbose == 1; print "Package-name is: ".$name."\n" if $verbose == 1; my $self = bless { Package => $name, PackageBuildDirectory => $directory, Verbose => $verbose },$class; print "Clean strings...\n" if $verbose == 1; $name =~ s:\ ::g if $name =~ m:\ :; $directory =~ s:/$::g if $directory =~ m:/$:; print "Build-directory is: ".$directory."\n" if $verbose == 1; print "Package-name is: ".$name."\n" if $verbose == 1; $PackageName = $name; $PackageBuildDirectory = $directory."/".$name; files(); return $self; } -*------------------------------------------------------------------*- it only wraps it untill a point like this: -*------------------------------------------------------------------*- sub new {... Package => $name, PackageBuildDirectory => $directory, Verbose => $verbose },$class; print "Clean strings...\n" if $verbose == 1; $name =~ s:\ ::g if $name =~ m:\ :; $directory =~ s:/$::g if $directory =~ m:/$:; print "Build-directory is: ".$directory."\n" if $verbose == 1; print "Package-name is: ".$name."\n" if $verbose == 1; $PackageName = $name; $PackageBuildDirectory = $directory."/".$name; files(); return $self; } -*------------------------------------------------------------------*- Is this fixable? Who is actually the maintainer/developer of outline.el at the moment? I only found an attribution that it is part of EMACS and that its © goes to the FSF. What about the person who wrote it? -- Cheers, Andreas Marschke