/[d-i]/trunk/manual/build/preseed.pl
ViewVC logotype

Diff of /trunk/manual/build/preseed.pl

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 58175 by fjp, Wed Apr 8 05:41:50 2009 UTC revision 58176 by fjp, Wed Apr 8 06:05:30 2009 UTC
# Line 129  sub start_rtn { Line 129  sub start_rtn {
129  # Execute when text is encountered  # Execute when text is encountered
130  sub text_rtn {  sub text_rtn {
131          my ($text) = @_;          my ($text) = @_;
132    
133          if ( $settitle ) {          if ( $settitle ) {
134                  # Clean leading and trailing whitespace for titles                  # Clean leading and trailing whitespace for titles
135                  $text =~ s/^[[:space:]]*//;                  $text =~ s/^[[:space:]]*//;
# Line 138  sub text_rtn { Line 139  sub text_rtn {
139                  $tagstatus{$titletag}{'title'} = $text;                  $tagstatus{$titletag}{'title'} = $text;
140                  $settitle = 0;                  $settitle = 0;
141          }          }
142          if ( $example{'print'} ) {  
143            if ( $example{'print'} && ! exists $ignore{'tag'} ) {
144                  # Print section headers                  # Print section headers
145                  for ($s=1; $s<=3; $s++) {                  for ($s=1; $s<=3; $s++) {
146                          my $sect="sect$s";                          my $sect="sect$s";
Legend:
Removed from v.58175  
changed lines
  Added in v.58176
  ViewVC Help
Powered by ViewVC 1.1.5