Changeset 1127 in ProjectBuilder for devel/pb/lib/ProjectBuilder/CMS.pm
- Timestamp:
- Dec 21, 2010, 2:37:35 AM (13 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
devel/pb/lib/ProjectBuilder/CMS.pm
r1114 r1127 798 798 open(CL,"> $dest/ChangeLog") || die "Unable to create $dest/ChangeLog"; 799 799 close(CL); 800 if (-x "/usr/bin/svn2cl") { 801 pb_system("/usr/bin/svn2cl --group-by-day --authors=$authors -i -o $dest/ChangeLog $pkgdir","Generating ChangeLog from SVN with svn2cl"); 800 my $command = pb_check_req("svn2cl",1); 801 if (-x $command) { 802 pb_system("$command --group-by-day --authors=$authors -i -o $dest/ChangeLog $pkgdir","Generating ChangeLog from SVN with svn2cl"); 802 803 } else { 803 804 # To be written from pbcl … … 824 825 open(CL,"> $dest/ChangeLog") || die "Unable to create $dest/ChangeLog"; 825 826 close(CL); 826 if (-x "/usr/bin/cvs2cl") { 827 pb_system("/usr/bin/cvs2cl --group-by-day -U $authors -f $dest/ChangeLog $pkgdir","Generating ChangeLog from CVS with cvs2cl"); 827 my $command = pb_check_req("cvs2cl",1); 828 if (-x $command) { 829 pb_system("$command --group-by-day -U $authors -f $dest/ChangeLog $pkgdir","Generating ChangeLog from CVS with cvs2cl"); 828 830 } else { 829 831 # To be written from pbcl … … 882 884 return($cmd."cvs") 883 885 } elsif (($scheme =~ /http/) || ($scheme =~ /ftp/)) { 884 if (-x "/usr/bin/wget") { 885 return($cmd."/usr/bin/wget -nv -O "); 886 } elsif (-x "/usr/bin/curl") { 887 return($cmd."/usr/bin/curl -o "); 888 } else { 889 die "Unable to handle $scheme.\nNo wget/curl available, please install one of those"; 886 my $command = pb_check_req("wget",1); 887 if (-x $command) { 888 return($cmd."$command -nv -O "); 889 } else { 890 $command = pb_check_req("curl",1); 891 if (-x $command) { 892 return($cmd."$command -o "); 893 } else { 894 die "Unable to handle $scheme.\nNo wget/curl available, please install one of those"; 895 } 890 896 } 891 897 } else {
Note:
See TracChangeset
for help on using the changeset viewer.