Parent Directory | Revision Log | Patch
revision 875 by dpavlin, Tue Jun 26 17:46:49 2007 UTC | revision 1049 by dpavlin, Mon Nov 19 16:50:10 2007 UTC | |
---|---|---|
# | Line 135 sub read_validate_file { | Line 135 sub read_validate_file { |
135 | if (@d) { | if (@d) { |
136 | $v->{$fld} = [ map { | $v->{$fld} = [ map { |
137 | my $sf = $_; | my $sf = $_; |
138 | if ( $sf =~ s/!(\*)?$/$1/ ) { | if ( $sf =~ s/!// ) { |
139 | $self->{must_exist_sf}->{ $fld }->{ $sf }++; | $self->{must_exist_sf}->{ $fld }->{ $sf }++; |
140 | }; | }; |
141 | $sf; | $sf; |
# | Line 593 sub save_delimiters_templates { | Line 593 sub save_delimiters_templates { |
593 | close($d); | close($d); |
594 | ||
595 | $log->info("new delimiters templates saved to $path"); | $log->info("new delimiters templates saved to $path"); |
596 | ||
597 | return 1; | |
598 | } | } |
599 | ||
600 | =head1 AUTHOR | =head1 AUTHOR |
|
ViewVC Help | |
Powered by ViewVC 1.1.26 |