Changeset 8574 for lang/perl/Punc/trunk
- Timestamp:
- 03/31/08 22:51:15 (8 months ago)
- Location:
- lang/perl/Punc/trunk/lib/Punc
- Files:
-
- 1 added
- 1 modified
-
Slave/Module.pm (modified) (2 diffs)
-
Util.pm (added)
Legend:
- Unmodified
- Added
- Removed
-
lang/perl/Punc/trunk/lib/Punc/Slave/Module.pm
r8565 r8574 5 5 use Pod::Text; 6 6 use Module::Pluggable; 7 use Punc::Util; 7 8 8 9 sub new { … … 17 18 18 19 my ( $fact ) = keys %$default_for; 19 if ( grep { `facter $fact`=~ /$_/i } @{ $default_for->{$fact} } ) {20 if ( grep { Punc::Util->fact($fact) =~ /$_/i } @{ $default_for->{$fact} } ) { 20 21 $class = $module; 21 22 }
![(please configure the [header_logo] section in trac.ini)](/share/chrome/site/your_project_logo.png)