Subversion Repositories wimsdev

Rev

Rev 14239 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 14239 Rev 15046
Line 61... Line 61...
61 
my $slibdir="public_html/scripts/slib/";
 61 
my $slibdir="public_html/scripts/slib/";
62 
my $helpdir="public_html/scripts/help";
 62 
my $helpdir="public_html/scripts/help";
63 
 
 63 
 
64 
my @Lang=('en','fr','cn','nl','it','ca', 'es') ;
 64 
my @Lang=('en','fr','cn','nl','it','ca', 'es') ;
65 
 
 65 
 
66 
system(`mkdir -p $DOSSIER`) ;
 66 
system("mkdir -p $DOSSIER") ;
67 
my @table=('if', 'oefparm0', 'oefparm1', 'oefparm2', 'oefparm3', 'oefparm4', 'oefparm5','oefcommand') ;
 67 
my @table=('if', 'oefparm0', 'oefparm1', 'oefparm2', 'oefparm3', 'oefparm4', 'oefparm5','oefcommand') ;
68 
 
 68 
 
69 
### for "editor"
 69 
### for "editor"
70 
my (%Begin, %End) ;
 70 
my (%Begin, %End) ;
71 
$Begin{'if'}= "  " ;
 71 
$Begin{'if'}= "  " ;
Line 237... Line 237...
237 
my $EDIT_AERA_OEF=$EDIT_AERA_OEF_begin ;
 237 
my $EDIT_AERA_OEF=$EDIT_AERA_OEF_begin ;
238 
my $EDIT_AERA=$EDIT_AERA_begin ;
 238 
my $EDIT_AERA=$EDIT_AERA_begin ;
239 
my $EDIT_AERA_DOC=$EDIT_AERA_DOC_begin ;
 239 
my $EDIT_AERA_DOC=$EDIT_AERA_DOC_begin ;
240 
 
 240 
 
241 
for my $lang (@Lang) {
 241 
for my $lang (@Lang) {
242 
   print "oefdoc.pl $lang\n" ;  system(`mkdir -p $DOSSIER/$lang`) ;
 242 
   print "oefdoc.pl $lang\n" ;  system("mkdir -p $DOSSIER/$lang") ;
243 
   slib($lang) ;
 243 
   slib($lang) ;
244 
   for my $t (@table) { tableau($t,$lang) ; }
 244 
   for my $t (@table) { tableau($t,$lang) ; }
245 
   phtml("$helpdir/$lang/special",$lang,"special",@phtml) ;
 245 
   phtml("$helpdir/$lang/special",$lang,"special",@phtml) ;
246 
   $EDIT_AERA_OEF .= "\n, \'special\' : \n[ \'\\embed\', \'\\special{" . join ("\', '\\special{", @phtml) . "\']" if ($lang =~ /en/) ;
 246 
   $EDIT_AERA_OEF .= "\n, \'special\' : \n[ \'\\embed\', \'\\special{" . join ("\', '\\special{", @phtml) . "\']" if ($lang =~ /en/) ;
247 
   anstype($lang) ;
 247 
   anstype($lang) ;