Ignore:
Timestamp:
Jul 29, 2007, 12:50:34 AM (12 years ago)
Author:
bruno
Message:

Lots of modifs to find the right way. Probably still not good

File:
1 edited

Legend:

Unmodified
Added
Removed
  • devel/pb/bin/mdv-changelog.pl

    r2 r5  
    88
    99open(FILE, $ARGV[0]) || die "Unable to open $ARGV[0]";
    10 open(OUT, "> $ENV{'PROJTMP'}/out.spec") || die "Unable to create $ENV{'MONDOTMP'}/out.spec";
    11 open(CMT, "> $ENV{'PROJTMP'}/cmt.spec") || die "Unable to create $ENV{'MONDOTMP'}/out.spec";
     10open(OUT, "> $ENV{'PBTMP'}/out.spec") || die "Unable to create $ENV{'MONDOTMP'}/out.spec";
     11open(CMT, "> $ENV{'PBTMP'}/cmt.spec") || die "Unable to create $ENV{'MONDOTMP'}/out.spec";
    1212while (<FILE>) {
    1313    if ($_ !~ /^\%changelog/) {
     
    2929                close (FILE);
    3030
    31                 move("$ENV{'PROJTMP'}/out.spec", $ARGV[0]);
     31                move("$ENV{'PBTMP'}/out.spec", $ARGV[0]);
    3232                exit(0);
    3333            }
Note: See TracChangeset for help on using the changeset viewer.