From a94bebde98142e4f7df98003c536020118c2db65 Mon Sep 17 00:00:00 2001 From: sithglan Date: Mon, 22 May 2006 12:03:37 +0000 Subject: [PATCH 1/1] fix html --- snom.pl | 8 ++++++-- 1 file changed, 6 insertions(+), 2 deletions(-) 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); } -- 2.39.2