Changeset 3260

Timestamp:

03/12/09 02:12:21 (3 years ago)

Author:

jquelin

Message:

replacing $DEFAULT_DIR by $PADRE_CONFIG_DIR

File:

• trunk/Padre/lib/Padre/Config.pm (modified) (2 diffs)

trunk/Padre/lib/Padre/Config.pm

@@ -58 +58 @@
 
 
-# Establish Padre's home directory
-my $DEFAULT_DIR = $PADRE_CONFIG_DIR;
-
-
 
 
@@ -431 +427 @@
 
 sub default_dir {
-    unless ( -e $DEFAULT_DIR ) {
-        File::Path::mkpath($DEFAULT_DIR) or
-        die "Cannot create config dir '$DEFAULT_DIR' $!";
-    }
-    return $DEFAULT_DIR;
+    unless ( -e $PADRE_CONFIG_DIR ) {
+        File::Path::mkpath($PADRE_CONFIG_DIR) or
+        die "Cannot create config dir '$PADRE_CONFIG_DIR' $!";
+    }
+    return $PADRE_CONFIG_DIR;
 }