From: sithglan <sithglan>
Date: Mon, 22 May 2006 12:03:37 +0000 (+0000)
Subject: fix html
X-Git-Url: https://git.zerfleddert.de/cgi-bin/gitweb.cgi/snom-frontend/commitdiff_plain/a94bebde98142e4f7df98003c536020118c2db65?hp=b78d620f92951712aae906f6bac0bd1b166644cc

fix html
---

diff --git a/snom.pl b/snom.pl
index 7b96919..aba0d35 100755
--- a/snom.pl
+++ b/snom.pl
@@ -1,5 +1,5 @@
 #!/bin/sh
-#$Id: snom.pl,v 1.31 2006-05-22 12:01:43 michael Exp $
+#$Id: snom.pl,v 1.32 2006-05-22 12:03:37 sithglan Exp $
 
 # http://developer.gnome.org/doc/API/2.2/gtk/gtk-migrating-GtkComboBox.html
 
@@ -355,7 +355,11 @@ sub UpdatePhoneInfo
 	print "TODO: Update PhoneInfo from <".${$Config{$sections[$g_host->get_active]}}{host}."> here!\n";
 	my $req = HTTP::Request->new(GET => "http://".${$Config{$sections[$g_host->get_active]}}{host}."/");
 	$ua->request($req);
-	print $req->content()."\n";
+        if (! $ua->success) {
+                die("Can't retrieve line information: ", $ua->response->status_line);
+        }
+
+	print $req->response->content()."\n";
 	$g_identity->append_text("\@line1");
 	$g_identity->set_active(0);
 }