Projekt

Allgemein

Profil

« Zurück | Weiter » 

Revision e74c2ab4

Von Sven Schöling vor mehr als 15 Jahren hinzugefügt

  • ID e74c2ab4728dfdc932cd290db005ce2250e9d61b
  • Vorgänger 683e76d2
  • Nachfolger 41b2e935

Druckerauswahl war nicht korrekt bei leerer Druckermenge.

Fix für Bug 934.

Unterschiede anzeigen:

bin/mozilla/bp.pl
33 33 

  		




  34
  34
  
    
use SL::BP;


  		




  35
  35
  
    
use Data::Dumper;


  		




  
  36
  
    
use List::Util qw(first);


  		




  36
  37
  
    

  		




  37
  38
  
    
1;


  		




  38
  39
  
    

  		




  ......




  348
  349
  
    

  		




  349
  350
  
    
  $form->get_lists(printers => 'ALL_PRINTERS');


  		




  350
  351
  
    
  # use the command stored in the databse or fall back to $myconfig{printer}


  		




  351
  
  
    
  my $selected_printer = (grep { $_->{id} eq $form->{printer} } @{ $form->{ALL_PRINTERS} })[0]->{'printer_command'} || $myconfig{printer};


  		




  
  352
  
    
  my $selected_printer =  first { $_ } map ({ $_ ->{printer_command} }


  		




  
  353
  
    
                                         grep { $_->{id} eq $form->{printer} }


  		




  
  354
  
    
                                           @{ $form->{ALL_PRINTERS} }),


  		




  
  355
  
    
                                       $myconfig{printer};


  		




  352
  356
  
    

  		




  353
  357
  
    
  if ($form->{callback}) {


  		




  354
  358
  
    
    map { $form->{callback} .= "&checked_$_=1" if $form->{"checked_$_"} }


  		












Auch abrufbar als:  Unified diff