diff options
Diffstat (limited to 'bin/confdiff')
-rwxr-xr-x | bin/confdiff | 27 |
1 files changed, 0 insertions, 27 deletions
diff --git a/bin/confdiff b/bin/confdiff deleted file mode 100755 index 5b6af859e..000000000 --- a/bin/confdiff +++ /dev/null @@ -1,27 +0,0 @@ -#!/usr/bin/perl - -use FS::UID qw(adminsuidsetup); -use FS::Conf; - -adminsuidsetup('ivan'); - -my $conf = new FS::Conf; - -my $file2 = pop @ARGV; -my $file1 = pop @ARGV; - -open(FILE1, ">/tmp/$file1") or die "can't open /tmp/$file1: $!"; -print FILE1 $conf->config($file1); -print FILE1 "\n"; -close FILE1 or die $!; - -open(FILE2, ">/tmp/$file2") or die "can't open /tmp/$file2: $!"; -print FILE2 $conf->config($file2); -print FILE2 "\n"; -close FILE2 or die $!; - -my @opt = @ARGV; - -system('diff', @opt, "/tmp/$file1", "/tmp/$file2"); - -#unlink("/tmp/$file1', "/tmp/$file2"); |