summaryrefslogtreecommitdiffstats
path: root/t/cfg.t
diff options
context:
space:
mode:
authorRafael Garcia-Suarez <rgarciasuarez@mandriva.org>2005-11-03 13:22:05 +0000
committerRafael Garcia-Suarez <rgarciasuarez@mandriva.org>2005-11-03 13:22:05 +0000
commit4c739cb2352af8f2102464714b4563ce2c53912f (patch)
treefb20c8b2dc54d07c4389c878e69850b9d8f50fb1 /t/cfg.t
parent8d5bf10babad2dc4b8ffac76636dde1c594f51dc (diff)
downloadurpmi-4c739cb2352af8f2102464714b4563ce2c53912f.tar
urpmi-4c739cb2352af8f2102464714b4563ce2c53912f.tar.gz
urpmi-4c739cb2352af8f2102464714b4563ce2c53912f.tar.bz2
urpmi-4c739cb2352af8f2102464714b4563ce2c53912f.tar.xz
urpmi-4c739cb2352af8f2102464714b4563ce2c53912f.zip
Don't use MDK::Common
Diffstat (limited to 't/cfg.t')
-rw-r--r--t/cfg.t8
1 files changed, 4 insertions, 4 deletions
diff --git a/t/cfg.t b/t/cfg.t
index 77c831ff..28a65d1c 100644
--- a/t/cfg.t
+++ b/t/cfg.t
@@ -1,7 +1,7 @@
#!/usr/bin/perl
use Test::More 'no_plan';
-use MDK::Common;
+use File::Slurp;
BEGIN { use_ok 'urpm::cfg' }
BEGIN { use_ok 'urpm::download' }
@@ -49,7 +49,7 @@ $cfgtext =~ s/\bkey_ids\b/key-ids/g;
$cfgtext =~ s/"123"/123/g;
$cfgtext =~ s/'kernel'/kernel/g;
-my $cfgtext2 = cat_($file.2);
+my $cfgtext2 = read_file($file.2);
$cfgtext2 =~ s/# generated.*\n//;
is( $cfgtext, $cfgtext2, 'config is the same' )
or system qw( diff -u ), $file, $file.2;
@@ -70,12 +70,12 @@ is( $p->{http_proxy}, 'http://yoyodyne:8080/', 'read media proxy' );
is( $p->{user}, 'rafael', 'proxy user' );
is( $p->{pwd}, 'richard', 'proxy password' );
ok( dump_proxy_config(), 'dump_proxy_config' );
-$cfgtext2 = cat_($proxyfile);
+$cfgtext2 = read_file($proxyfile);
$cfgtext2 =~ s/# generated.*\n//;
is( $cfgtext, $cfgtext2, 'dumped correctly' );
set_proxy_config(http_proxy => '');
ok( dump_proxy_config(), 'dump_proxy_config erased' );
-$cfgtext2 = cat_($proxyfile);
+$cfgtext2 = read_file($proxyfile);
$cfgtext2 =~ s/# generated.*\n//;
$cfgtext =~ s/^http_proxy.*\n//;
is( $cfgtext, $cfgtext2, 'dumped correctly' );