Subversion Repositories wimsdev

(root)/trunk/wims/bin/oefdoc.pl – Rev 12614 → 13623



}
 
sub end_js {my ($text)=@_ ;
  "\'$text\' ; return chaine_aide;
           break;
        ////********************\n
        "
}
sub function_js {my ($text,$tag)=@_ ;
 "function $tag" . "fun(instruction){
    switch(instruction)

Rev 12614	Rev 13623
Line 522...	Line 522...
522	}	522	}
523		523
524	sub end_js {my ($text)=@_ ;	524	sub end_js {my ($text)=@_ ;
525	"\'$text\' ; return chaine_aide;	525	"\'$text\' ; return chaine_aide;
526	break;	526	break;
527	////******************** \n	527	////********************\n
528	"	528	"
529	}	529	}
530	sub function_js {my ($text,$tag)=@_ ;	530	sub function_js {my ($text,$tag)=@_ ;
531	"function $tag" . "fun(instruction){	531	"function $tag" . "fun(instruction){
532	switch(instruction)	532	switch(instruction)