Fix a bug where having Mr. Voice Online version check enabled without…

… a working internet connection would prevent the application from starting. Reported by Tim in Richmond.
minter · Aug 14, 2005 · 6f7051f · 6f7051f
1 parent 0688b00
commit 6f7051f
Show file tree

Hide file tree

Showing 2 changed files with 21 additions and 8 deletions.
diff --git a/ChangeLog b/ChangeLog
@@ -1,3 +1,8 @@
+Sun  Aug 14 2005	H. Wade Minter (minter@lunenburg.org)
+     * Fix a bug where having Mr. Voice Online version check enabled without
+       a working internet connection would prevent the application from 
+       starting.  Reported by Tim in Richmond.
+
 Sun  Aug  7 2005	H. Wade Minter (minter@lunenburg.org)
      * Fix a bug where searching for a string with an apostrophe in it would
        cause an error.

diff --git a/mrvoice.pl b/mrvoice.pl
@@ -785,14 +785,22 @@ sub check_version
         return;
     }
 
-    my $search_call = $xmlrpc->call(
-        'check_version',
-        {
-            os      => $^O,
-            version => $version
-        }
-      )
-      or die "Couldn't call search_call";
+    my $search_call;
+    eval {
+        $search_call = $xmlrpc->call(
+            'check_version',
+            {
+                os      => $^O,
+                version => $version
+            }
+        );
+    };
+
+    if ($@)
+    {
+        $status = $@;
+        return;
+    }
 
     my $result = $search_call->result;
     if ( !$result )