From 249f964aa3f6f0d2e7eed2ca7a0f91d673f9eaf9 Mon Sep 17 00:00:00 2001 From: michael Date: Mon, 22 May 2006 12:15:35 +0000 Subject: [PATCH] fill box --- snom.pl | 15 +++------------ 1 file changed, 3 insertions(+), 12 deletions(-) diff --git a/snom.pl b/snom.pl index 7079772..597585a 100755 --- a/snom.pl +++ b/snom.pl @@ -1,5 +1,5 @@ #!/bin/sh -#$Id: snom.pl,v 1.34 2006-05-22 12:11:55 michael Exp $ +#$Id: snom.pl,v 1.35 2006-05-22 12:15:35 michael Exp $ # http://developer.gnome.org/doc/API/2.2/gtk/gtk-migrating-GtkComboBox.html @@ -352,12 +352,8 @@ sub KBDInput 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}."/"); my $response = $ua->request($req); - if ($response->is_error) { - die("Can't retrieve line information: ", $ua->response->status_line); - } my @lines=split("\n", $response->content()); foreach (@lines) { @@ -366,15 +362,10 @@ sub UpdatePhoneInfo # # if (m/^\