From 1b60460160078c2ba512f958fdd74ca7f2c18fdf Mon Sep 17 00:00:00 2001 From: michael Date: Sat, 23 Jun 2007 11:29:58 +0000 Subject: [PATCH 1/1] update identity selection to work with firmware 7 --- snom.pl | 12 +++++++++--- 1 file changed, 9 insertions(+), 3 deletions(-) diff --git a/snom.pl b/snom.pl index 1682938..645a68e 100755 --- a/snom.pl +++ b/snom.pl @@ -1,5 +1,5 @@ #!/bin/sh -#$Id: snom.pl,v 1.44 2006-05-24 14:31:16 michael Exp $ +#$Id: snom.pl,v 1.45 2007-06-23 11:29:58 michael Exp $ PATH=/opt/csw/bin:/opt/local/bin:/usr/bin:/bin exec perl -w -x "$0" "$@" @@ -374,18 +374,24 @@ sub UpdatePhoneInfo } my @lines=split("\n", $response->content()); my $num = 0; + my $activated = 0; + foreach (@lines) { chomp; # # # - if (m/^\