From 439926550d440587be2603644ae68c1c738a3c56 Mon Sep 17 00:00:00 2001
From: Don Armstrong <don@donarmstrong.com>
Date: Sat, 9 Aug 2008 11:33:27 -0700
Subject: [PATCH]  * fix archived for undef location

---
 Debbugs/Status.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/Debbugs/Status.pm b/Debbugs/Status.pm
index 44eff9b..3b3961f 100644
--- a/Debbugs/Status.pm
+++ b/Debbugs/Status.pm
@@ -251,7 +251,7 @@ sub read_bug{
     # Add log last modified time
     $data{log_modified} = (stat($log))[9];
     $data{location} = $location;
-    $data{archived} = defined($location) and $location eq 'archive';
+    $data{archived} = (defined($location) and ($location eq 'archive'))?1:0;
     $data{bug_num} = $param{bug};
 
     return \%data;
-- 
2.39.2