Projekt

Allgemein

Profil

« Zurück | Weiter » 

Revision f2078516

Von Sven Schöling vor etwa 15 Jahren hinzugefügt

  • ID f20785168580f2d3587ebb2d06ade189246fd5f3
  • Vorgänger ebceac3e
  • Nachfolger 31b977d6

Nur realtive URIs für logon.pl?callback= erlauben.

Unterschiede anzeigen:

bin/mozilla/menuv4.pl
34 34 

  		




  35
  35
  
    
$menufile = "menu.ini";


  		




  36
  36
  
    
use SL::Menu;


  		




  
  37
  
    
use URI;


  		




  37
  38
  
    

  		




  38
  39
  
    
1;


  		




  39
  40
  
    

  		




  ......




  44
  45
  
    

  		




  45
  46
  
    
  $form->{date}     = clock_line();


  		




  46
  47
  
    
  $form->{menu}     = acc_menu();


  		




  47
  
  
    
  $form->{callback} = $form->unescape($form->{callback}) || "login.pl?action=company_logo";


  		




  
  48
  
    
  my $callback      = $form->unescape($form->{callback});


  		




  
  49
  
    
  $main::lxdebug->message(0, ">>>>>  $callback");


  		




  
  50
  
    
  $callback         = URI->new($callback)->rel($callback) if $callback;


  		




  
  51
  
    
  $main::lxdebug->message(0, ">>>>>  $callback");


  		




  
  52
  
    
  $callback         = "login.pl?action=company_logo"      if $callback =~ /^(.\/)?$/;


  		




  
  53
  
    
  $main::lxdebug->message(0, ">>>>>  $callback");


  		




  
  54
  
    
  $form->{callback} = $callback;


  		




  48
  55
  
    

  		




  49
  56
  
    
  print $form->parse_html_template("menu/menuv4");


  		




  50
  57
  
    

  		












Auch abrufbar als:  Unified diff