[Bps-public-commit] r9206 - Text-Quoted
ruz at bestpractical.com
ruz at bestpractical.com
Wed Oct 3 07:03:33 EDT 2007
Author: ruz
Date: Wed Oct 3 07:03:32 2007
New Revision: 9206
Modified:
Text-Quoted/ (props changed)
Text-Quoted/Quoted.pm
Log:
r18262 at cubic-pc: cubic | 2007-10-03 14:15:12 +0400
* another properties of a line are not used anywhere
Modified: Text-Quoted/Quoted.pm
==============================================================================
--- Text-Quoted/Quoted.pm (original)
+++ Text-Quoted/Quoted.pm Wed Oct 3 07:03:32 2007
@@ -178,11 +178,9 @@
my %line = ( raw => $_ );
s/\A *($quoter?)( *)//;
$line{quoter} = $1;
- $line{quotespace} = $2;
$line{hang} = Hang->new($_);
s/( *)(.*?)(\s*)$//;
- $line{hangspace} = $1;
$line{text} = $2;
$line{empty} = $line{hang}->empty() && $2 !~ /\S/;
$line{separator} = $line{text} =~ /^$separator$/;
More information about the Bps-public-commit
mailing list