Changeset 473 in ProjectBuilder for devel/pb/lib


Ignore:
Timestamp:
Jun 4, 2008, 3:04:36 AM (16 years ago)
Author:
Bruno Cornec
Message:

Working announce action for pb

Location:
devel/pb/lib/ProjectBuilder
Files:
2 edited

Legend:

Unmodified
Added
Removed

  • devel/pb/lib/ProjectBuilder/Changelog.pm

    r415 r473  
    133133$tmp = <INPUT>;
    134134if ($dtype eq "announce") {
    135     print $OUTPUT $tmp;
     135    chomp($tmp);
     136    print $OUTPUT "$tmp<br>\n";
    136137}
    137138$tmp = <INPUT>;
    138139if ($dtype eq "announce") {
    139     print $OUTPUT $tmp;
     140    chomp($tmp);
     141    print $OUTPUT "$tmp<br>\n";
    140142}
    141143
    … …  
    180182            print $OUTPUT "$tmp";
    181183        } else {
    182             print $OUTPUT "$tmp";
     184            chomp($tmp);
     185            print $OUTPUT "$tmp<br>\n";
    183186        }
    184187        last if (eof(INPUT));

  • devel/pb/lib/ProjectBuilder/Filter.pm

    r462 r473  
    166166pb_log(2,"DEBUG: From $f to $destfile\n");
    167167pb_mkdir_p(dirname($destfile)) if (! -d dirname($destfile));
    168 open(DEST,"> $destfile") || die "Unable to create $destfile";
     168open(DEST,"> $destfile") || die "Unable to create $destfile: $!";
    169169open(FILE,"$f") || die "Unable to open $f: $!";
    170170while (<FILE>) {
Note: See TracChangeset for help on using the changeset viewer.