Subversion Repositories DevTools

Rev

Rev 6990 | Rev 7005 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 6990 Rev 7004
Line 1368... Line 1368...
1368
            # They will be regenerated
1368
            # They will be regenerated
1369
            next;
1369
            next;
1370
 
1370
 
1371
        } elsif( $line =~ m~^#~) {
1371
        } elsif( $line =~ m~^#~) {
1372
            # Non empty comments are transferred
1372
            # Non empty comments are transferred
-
 
1373
            #   Prepend another '#' marker as some moron decided that they could parse comments for data
-
 
1374
            #   A double # should defeat that
-
 
1375
            #   
1373
            print_mf ('') unless ( $last_was_comment ) ;
1376
            print_mf ('') unless ( $last_was_comment ) ;
1374
            print_mf( $line);
1377
            print_mf( '#' . $line);
1375
            $last_was_comment = 1;
1378
            $last_was_comment = 1;
1376
            next;
1379
            next;
1377
 
1380
 
1378
        } elsif ($line =~ m~^\[~ ) {
1381
        } elsif ($line =~ m~^\[~ ) {
1379
            # Metadata from the template
1382
            # Metadata from the template