Ticket #2686: retrieve_op_conf_from_mysql.patch
| File retrieve_op_conf_from_mysql.patch, 2.4 kB (added by Nick_Lewis, 4 months ago) |
|---|
-
after/retrieve_op_conf_from_mysql.pl
old new 359 359 $zapdef=@{$row}[0]; 360 360 $zapdesc=@{$row}[1]; 361 361 $icon='3'; 362 # zaplines and trunklist share the trunk positions so need to store previous btn on overflow from zaplines 363 my $previousbtn = $btn; 362 364 $btn=get_next_btn($trunkpos,$btn); 365 if ($btn eq 0) {$btn = $previousbtn; last;} 363 366 if ($zapdef eq "Zap/*") { 364 367 $numbuttons=@{$row}[2]-1; 365 368 print EXTEN "[$zapdef]\nLabel=\"$zapdesc\"\nExtension=-1\nIcon=$icon\nPanel_Context=$panelcontext\nPosition=".$btn; … … 381 384 my $table = @{ $row }[2]; 382 385 next if ($account eq ""); 383 386 $btn=get_next_btn($trunkpos,$btn); 387 if ($btn eq 0) {last;} 384 388 $statement = "SELECT keyword,data from $table where id=$id and keyword <> 'account' and flags <> 1 order by keyword"; 385 389 my $result = $dbh->selectall_arrayref($statement); 386 390 unless ($result) { … … 418 422 419 423 ### Write Parkings lots 420 424 $btn=0; 421 my $parken ;425 my $parken="" ; 422 426 my $extpark ; 423 427 my $parkcontext ; 424 428 my $numberlots ; 425 429 my $maxparkingslots ; 426 430 427 $maxparkingslots = 0 ;428 do429 {430 $btn=get_next_btn($parkingpos,$btn);431 $maxparkingslots = $maxparkingslots - 1 ;432 }433 while ($btn != 0);434 $maxparkingslots = $maxparkingslots + 1 ;435 436 431 foreach my $row ( @parkings ) { 437 432 if (@{$row}[0] eq "parkingenabled") { 438 433 $parken = @{$row}[1] ; … … 448 443 } 449 444 } 450 445 if ($parken eq "s") { 451 for (my $i = 1 ; $i <= $numberlots && $i <= 5; $i++ ) {446 for (my $i = 1 ; $i <= $numberlots ; $i++ ) { 452 447 $btn=get_next_btn($parkingpos,$btn); 448 if ($btn eq 0) {last;} 453 449 $parknum = $extpark + $i ; 454 450 $icon='1'; 455 451 print EXTEN "[PARK$parknum]\nPosition=$btn\nLabel=\"Parked ($parknum)\"\nExtension=$parknum\nContext=$parkcontext\nIcon=$icon\nPanel_Context=$panelcontext\n"; … … 467 463 } 468 464 foreach my $row ( @confrange ) { 469 465 $btn=get_next_btn($confepos,$btn); 466 if ($btn eq 0) {last;} 470 467 $confenum=@{$row}[0]; 471 468 $confedesc=@{$row}[1]; 472 469 $icon='6'; … … 483 480 } 484 481 foreach my $row ( @queuerange ) { 485 482 $btn=get_next_btn($queuepos,$btn); 483 if ($btn eq 0) {last;} 486 484 $queuename=@{$row}[0]; 487 485 $queuedesc=@{$row}[1]; 488 486 $icon='5';
