Changeset 3259
- Timestamp:
- 03/12/09 02:11:01 (3 years ago)
- File:
-
- 1 edited
-
trunk/Padre/lib/Padre/Config.pm (modified) (1 diff)
Legend:
- Unmodified
- Added
- Removed
-
trunk/Padre/lib/Padre/Config.pm
r3258 r3259 57 57 }; 58 58 59 sub product_path {60 if ( defined $ENV{PADRE_HOME} ) {61 # When explicitly set, always use the Unix style62 return qw{ .padre };63 } elsif ( File::Spec->isa('File::Spec::Win32') ) {64 # On Windows use the traditional Vendor/Product format65 return qw{ Perl Padre };66 } else {67 # Use the the Unix style elsewhere.68 # TODO - We may want to do something special on Mac69 return qw{ .padre };70 }71 }72 59 73 60 # Establish Padre's home directory
Note: See TracChangeset
for help on using the changeset viewer.
