[TWiki-Dev] [SVN] SvenDowideit r17039 - in twiki/branches/TWikiRelease04x02/lib: . TWiki/Configure

[<de...@de...>]

Author: SvenDowideit
Date: 2008-07-17 02:05:26 -0500 (Thu, 17 Jul 2008)
New Revision: 17039
Trac url: http://develop.twiki.org/trac/changeset/17039

Modified:
   twiki/branches/TWikiRelease04x02/lib/DEPENDENCIES
   twiki/branches/TWikiRelease04x02/lib/TWiki/Configure/Checker.pm
Log:
Item5727: lets report _all_ the perl modules in the DEPENDENCIES file and their comments

Modified: twiki/branches/TWikiRelease04x02/lib/DEPENDENCIES
===================================================================
--- twiki/branches/TWikiRelease04x02/lib/DEPENDENCIES	2008-07-17 05:21:57 UTC (rev 17038)
+++ twiki/branches/TWikiRelease04x02/lib/DEPENDENCIES	2008-07-17 07:05:26 UTC (rev 17039)
@@ -1,5 +1,5 @@
 B::Deparse,>=0,cpan,Required, for base TWiki
-CGI,>=0,cpan,Required, for base TWiki
+CGI,>=0,cpan,Required, for base TWiki (Avoid version 3.37 and versions prior to 3.15 if you can.)
 Carp,>=0,cpan,Required, for base TWiki
 Config,>=0,cpan,Required, for base TWiki
 Cwd,>=0,cpan,Required, for base TWiki

Modified: twiki/branches/TWikiRelease04x02/lib/TWiki/Configure/Checker.pm
===================================================================
--- twiki/branches/TWikiRelease04x02/lib/TWiki/Configure/Checker.pm	2008-07-17 05:21:57 UTC (rev 17038)
+++ twiki/branches/TWikiRelease04x02/lib/TWiki/Configure/Checker.pm	2008-07-17 07:05:26 UTC (rev 17039)
@@ -188,7 +188,6 @@
 
     my $e = '';
     foreach my $mod (@$mods) {
-        next if $INC{$mod->{name} . '.pm'}; # skip if already included
         $mod->{minimumVersion} ||= 0;
         $mod->{disposition} ||= '';
         my $n = '';
@@ -222,6 +221,7 @@
         } else {
             $mod_version ||= 'Unknown version';
             $n = $this->NOTE($mod_version.' installed');
+            $n .= ' Desc: ' . $mod->{usage} if $mod->{usage};
         }
         $e .= $this->setting($mod->{name}, $n);
     }