--- sms.alert	2003/02/04 15:16:37	1.2
+++ sms.alert	2003/02/04 15:39:44	1.3
@@ -6,7 +6,7 @@
 # based on qpage.alert by Jim Trocki, trockij@transmeta.com
 #
 # usage:
-# 	sms.alter [-f][-l][-u] 385abxxxxxx|name
+# 	sms.alter [-f][-l][-u] 385abxxxxxx|name[ 12345|name...]
 #
 # flags:
 # 	-u	this is upalert
@@ -55,7 +55,7 @@
 $sms .= "\n$ALERT $opt{g}/$opt{s} $summary ($wday $mon $day $tm)\n";
 $sms .= join("\n",@MSG) if $opt{'l'};
 
-foreach my $to (@ARGV) {
+foreach my $to (shift @ARGV) {
 	if (open(SMS, "> $sms_outgoing/mon$$")) {
 		my $phone = $to;
 		$phone = $name2phone{lc($to)} if ($name2phone{lc($to)});