Parent Directory | Revision Log | Patch
revision 96 by dpavlin, Sat Jan 28 17:58:22 2006 UTC | revision 97 by dpavlin, Sat Jan 28 18:19:47 2006 UTC | |
---|---|---|
# | Line 321 sub dump_draft { | Line 321 sub dump_draft { |
321 | my $draft; | my $draft; |
322 | ||
323 | foreach my $attr_name (sort keys %{ $self->{attrs} }) { | foreach my $attr_name (sort keys %{ $self->{attrs} }) { |
324 | next unless(my $v = $self->{attrs}->{$attr_name}); | next unless defined(my $v = $self->{attrs}->{$attr_name}); |
325 | $draft .= $attr_name . '=' . $v . "\n"; | $draft .= $attr_name . '=' . $v . "\n"; |
326 | } | } |
327 |
|
ViewVC Help | |
Powered by ViewVC 1.1.26 |