Projekt

Allgemein

Profil

« Zurück | Weiter » 

Revision 429203bf

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

  • ID 429203bfb57dd673aa807d749ab43c8e3332f8c8
  • Vorgänger 9257ca9a
  • Nachfolger 7f8cada2

generic translations strict

Unterschiede anzeigen:

bin/mozilla/generictranslations.pl
2 2 
use SL::Form;
3 3 
use SL::GenericTranslations;
4 4 

  		




  
  5
  
    
use strict;


  		




  
  6
  
    

  		




  5
  7
  
    
sub edit_greetings {


  		




  6
  
  
    
  $lxdebug->enter_sub();


  		




  
  8
  
    
  $main::lxdebug->enter_sub();


  		




  
  9
  
    

  		




  
  10
  
    
  $main::auth->assert('config');


  		




  7
  11
  
    

  		




  8
  
  
    
  $auth->assert('config');


  		




  
  12
  
    
  my $form     = $main::form;


  		




  
  13
  
    
  my $locale   = $main::locale;


  		




  9
  14
  
    

  		




  10
  15
  
    
  $form->get_lists('languages' => 'LANGUAGES');


  		




  11
  16
  
    

  		




  ......




  33
  38
  
    
  $form->header();


  		




  34
  39
  
    
  print $form->parse_html_template('generictranslations/edit_greetings');


  		




  35
  40
  
    

  		




  36
  
  
    
  $lxdebug->leave_sub();


  		




  
  41
  
    
  $main::lxdebug->leave_sub();


  		




  37
  42
  
    
}


  		




  38
  43
  
    

  		




  39
  44
  
    
sub save_greetings {


  		




  40
  
  
    
  $lxdebug->enter_sub();


  		




  
  45
  
    
  $main::lxdebug->enter_sub();


  		




  
  46
  
    

  		




  
  47
  
    
  $main::auth->assert('config');


  		




  41
  48
  
    

  		




  42
  
  
    
  $auth->assert('config');


  		




  
  49
  
    
  my $form     = $main::form;


  		




  
  50
  
    
  my $locale   = $main::locale;


  		




  43
  51
  
    

  		




  44
  52
  
    
  $form->get_lists('languages' => 'LANGUAGES');


  		




  45
  53
  
    

  		




  ......




  60
  68
  
    

  		




  61
  69
  
    
  edit_greetings();


  		




  62
  70
  
    

  		




  63
  
  
    
  $lxdebug->leave_sub();


  		




  
  71
  
    
  $main::lxdebug->leave_sub();


  		




  64
  72
  
    
}


  		




  65
  73
  
    

  		




  66
  74
  
    
1;


  		












Auch abrufbar als:  Unified diff