r14299 - /scripts/qa/DebianQA/Config.pm

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

Author: tincho-guest
Date: Thu Feb  7 22:02:04 2008
New Revision: 14299

URL: http://svn.debian.org/wsvn/?sc=1&rev=14299
Log:
Properly verify $HOME before using it

Modified:
    scripts/qa/DebianQA/Config.pm

Modified: scripts/qa/DebianQA/Config.pm
URL: http://svn.debian.org/wsvn/scripts/qa/DebianQA/Config.pm?rev=14299&op=diff
==============================================================================
--- scripts/qa/DebianQA/Config.pm (original)
+++ scripts/qa/DebianQA/Config.pm Thu Feb  7 22:02:04 2008
@@ -58,7 +58,7 @@
         ignore_severities => ""
     },
     common => {
-        cache_dir => "$ENV{HOME}/.debianqa/yourgroup",
+        cache_dir => "~/.debianqa/yourgroup",
         # verbosity level: error => 0, warn => 1, info => 2, debug => 3
         # Should be 1 by default, 0 for quiet mode
         verbose => 1,
@@ -78,7 +78,7 @@
     unless($file) {
         if($ENV{DEBIAN_QA_CONF}) {
             $file = $ENV{DEBIAN_QA_CONF};
-        } elsif(-e "$ENV{HOME}/.debianqa/debianqa.conf") {
+        } elsif($ENV{HOME} and -e "$ENV{HOME}/.debianqa/debianqa.conf") {
             $file = "$ENV{HOME}/.debianqa/debianqa.conf";
         } elsif(-e "/etc/debianqa.conf") {
             $file = "/etc/debianqa.conf";