Bug 645427: Bugzilla->usage_mode( USAGE_MODE_BROWSER ) doesn't change Bugzilla->usage_mode

r/a=LpSolit

Bug 645427: Bugzilla->usage_mode( USAGE_MODE_BROWSER ) doesn't change Bugzilla->usage_mode
4862600f · Koosha Khajeh Moogahi · Frédéric Buclin · d550fa97 · 4862600f
Commit 4862600f authored Apr 24, 2012 by Koosha Khajeh Moogahi Committed by Frédéric Buclin Apr 24, 2012
Hide whitespace changes
Inline Side-by-side

Showing with 8 additions and 2 deletions

Bugzilla.pm Bugzilla.pm +8 -2

No files found.
--- a/Bugzilla.pm
+++ b/Bugzilla.pm
@@ -485,8 +485,14 @@ sub usage_mode {
        }
        $class->request_cache->{usage_mode} = $newval;
    }
-    return $class->request_cache->{usage_mode}
-        || (i_am_cgi()? USAGE_MODE_BROWSER : USAGE_MODE_CMDLINE);
+
+    # XXX - Once we require Perl 5.10.1, this test can be replaced by //.
+    if (exists $class->request_cache->{usage_mode}) {
+        return $class->request_cache->{usage_mode};
+    }
+    else {
+        return (i_am_cgi()? USAGE_MODE_BROWSER : USAGE_MODE_CMDLINE);
+    }
 }

 sub installation_mode {