Author: pebender
Date: Sat Feb 28 15:42:01 2009
New Revision: 4429

Modified:
    trunk/gar-minimyth/html/minimyth/document-changelog.txt
    trunk/gar-minimyth/script/perl/perl-MiniMyth/checksums
    trunk/gar-minimyth/script/perl/perl-MiniMyth/files/MiniMyth.pm

Log:
- Changed MiniMyth::mythfrontend_networkcontrol so that it does not crash
   when the telnet connection fails.



Modified: trunk/gar-minimyth/html/minimyth/document-changelog.txt
==============================================================================
--- trunk/gar-minimyth/html/minimyth/document-changelog.txt     (original)
+++ trunk/gar-minimyth/html/minimyth/document-changelog.txt     Sat Feb 28  
15:42:01 2009
@@ -35,6 +35,10 @@
      - Removed (or renamed) the i2c.* lircd.conf files as they are the same  
as
        the serial.* lircd.conf files.

+Fixed bugs
+    - Changed MiniMyth::mythfrontend_networkcontrol so that it does not  
crash
+      when the telnet connection fails.
+
  Fixed build system
      - Patched disk/e2fsprogs so that chmod's during build are more likely  
to
        work and less likely to result in unnecessarily fatal build errors.

Modified: trunk/gar-minimyth/script/perl/perl-MiniMyth/checksums
==============================================================================
--- trunk/gar-minimyth/script/perl/perl-MiniMyth/checksums      (original)
+++ trunk/gar-minimyth/script/perl/perl-MiniMyth/checksums      Sat Feb 28  
15:42:01 2009
@@ -1 +1 @@
-505587d310501d2934225511f138b45e  download/MiniMyth.pm
+91a03f60b927c0b3667df46622634332  download/MiniMyth.pm

Modified: trunk/gar-minimyth/script/perl/perl-MiniMyth/files/MiniMyth.pm
==============================================================================
--- trunk/gar-minimyth/script/perl/perl-MiniMyth/files/MiniMyth.pm       
(original)
+++ trunk/gar-minimyth/script/perl/perl-MiniMyth/files/MiniMyth.pm      Sat Feb 
 
28 15:42:01 2009
@@ -1026,7 +1026,7 @@
                                   'Host'    => 'localhost',
                                   'Port'    => $port,
                                   'Prompt'  => $prompt);
-    if ($telnet->open())
+    if (($telnet) && ($telnet->open()))
      {
          $telnet->waitfor($prompt);
          my @lines = $telnet->cmd($command);

--~--~---------~--~----~------------~-------~--~----~
You received this message because you are subscribed to the Google Groups 
"minimyth-commits" group.
To post to this group, send email to [email protected]
To unsubscribe from this group, send email to 
[email protected]
For more options, visit this group at 
http://groups.google.com/group/minimyth-commits?hl=en
-~----------~----~----~----~------~----~------~--~---

Reply via email to