From 57d224bc4906da15b7dc3af9ff5049d699906fe2 Mon Sep 17 00:00:00 2001 From: Michael Pyne Date: Sun, 25 Oct 2009 02:45:15 +0000 Subject: [PATCH] Do not crash when not using a config file svn path=/trunk/KDE/kdesdk/scripts/kdesvn-build; revision=1039966 --- kdesvn-build | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/kdesvn-build b/kdesvn-build index 354e5a9..2da1b20 100755 --- a/kdesvn-build +++ b/kdesvn-build @@ -3319,7 +3319,7 @@ sub write_persistent_options { return if pretending; - my $dir = dirname($rcfile); + my $dir = dirname($rcfile ? $rcfile : ""); my $fh = IO::File->new("> $dir/.kdesvn-build-data"); if (not defined $fh) @@ -3352,7 +3352,7 @@ sub write_persistent_options # The directory used is the same directory that contains the rc file in use. sub read_persistent_options { - my $dir = dirname($rcfile); + my $dir = dirname($rcfile ? $rcfile : ""); my $fh = IO::File->new("<$dir/.kdesvn-build-data"); return unless defined $fh;