Changeset 74 in ProjectBuilder for devel/pb/lib/ProjectBuilder/Changelog.pm

Timestamp:

Sep 1, 2007, 1:56:48 AM (17 years ago)

Author:

Bruno Cornec

Message:

Big renaming to be more perlish
Single module Base contains all routines except when detaching makes sense

File:

• devel/pb/lib/ProjectBuilder/Changelog.pm (moved) (moved from devel/pb/lib/ProjectBuilder/changelog.pm ) (2 diffs)

devel/pb/lib/ProjectBuilder/Changelog.pm

@@ -10 +10 @@
 use File::Basename;
 use English;
+use ProjectBuilder::Base qw (pb_conf_read);
 
-sub changelog {
+sub pb_changelog {
 
 my $dtype = shift;
@@ -65 +66 @@
     my $n2date = &UnixDate($date,"%a, %d %b %Y %H:%M:%S %z");
     #print "**$ndate**\n";
+    my $confparam = pb_conf_read("$ENV{'PBCONF'}/$ENV{'PBPROJ'}.pb", "confparam");
+    my %confparam = %$confparam;
     if (($dtype eq "rpm") || ($dtype eq "fc")) {
         if ($ver !~ /-/) {