r77407 - in /trunk/libconfig-model-perl: Build.PL MANIFEST lib/Config/Model/AutoRead.pm

[fabreg-guest at users.alioth.debian.org]

Author: fabreg-guest
Date: Tue Jul 12 13:26:31 2011
New Revision: 77407

URL: http://svn.debian.org/wsvn/pkg-perl/?sc=1&rev=77407
Log:
Unapply previous patch

Modified:
    trunk/libconfig-model-perl/Build.PL
    trunk/libconfig-model-perl/MANIFEST
    trunk/libconfig-model-perl/lib/Config/Model/AutoRead.pm

Modified: trunk/libconfig-model-perl/Build.PL
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libconfig-model-perl/Build.PL?rev=77407&op=diff
==============================================================================
--- trunk/libconfig-model-perl/Build.PL (original)
+++ trunk/libconfig-model-perl/Build.PL Tue Jul 12 13:26:31 2011
@@ -53,7 +53,7 @@
     module_name => 'Config::Model',
     @version_info,
     license       => 'lgpl',
-    script_files  => ['config-edit', 'debian/dh/dh_config_model_upgrade' ],
+    script_files  => ['config-edit'],
     appli_files   => \%appli_files,
     dist_abstract => 'Describe, edit and validate configuration data',
     dist_author   => 'Dominique Dumont (ddumont at cpan dot org)',

Modified: trunk/libconfig-model-perl/MANIFEST
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libconfig-model-perl/MANIFEST?rev=77407&op=diff
==============================================================================
--- trunk/libconfig-model-perl/MANIFEST (original)
+++ trunk/libconfig-model-perl/MANIFEST Tue Jul 12 13:26:31 2011
@@ -10,7 +10,6 @@
 TODO
 config-edit
 contrib/bash_completion.config-edit
-debian/dh/dh_config_model_upgrade
 examples/fstab/README
 examples/fstab/add-ext4-workshop.txt
 examples/fstab/fstab.sample

Modified: trunk/libconfig-model-perl/lib/Config/Model/AutoRead.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libconfig-model-perl/lib/Config/Model/AutoRead.pm?rev=77407&op=diff
==============================================================================
--- trunk/libconfig-model-perl/lib/Config/Model/AutoRead.pm (original)
+++ trunk/libconfig-model-perl/lib/Config/Model/AutoRead.pm Tue Jul 12 13:26:31 2011
@@ -62,7 +62,7 @@
     my $dir = $args{root}.$args{config_dir} ;
     if ($dir =~ /~/) { 
         my $home = File::HomeDir->my_data; # Works also on Windows
-        $dir =~ s/^~/$home/;
+        $dir =~ s/~/$home/;
     }
     
     $dir .= '/' unless $dir =~ m!/$! ;