Ze final test !


Apres defauts : VueEditee Toggle VersionDeOrdali Defauts



couldn't connect to display ":1" while executing "load /enadisk/commun/linux/local/ActiveTcl-8.6.4/lib/libtk8.6.so Tk" ("package ifneeded Tk 8.6.4" script) invoked from within "package require Tk" (in namespace eval "::request" script line 31) invoked from within "namespace eval request { puts -nonewline "" if {0} { set Cmd "Xvfb :1 & ; setenv DISPLAY localhost:1 ; setenv ORDALIEONWEB 1 ; setenv ORDALIDI..."

OUTPUT BUFFER:

source /usr/local/apache2/PourRivet/SessionBeforeScript.tcl namespace eval request { puts -nonewline "" if {0} { set Cmd "Xvfb :1 & ; setenv DISPLAY localhost:1 ; setenv ORDALIEONWEB 1 ; setenv ORDALIDIR /home/moumou/ordali ; setenv PATH /home/moumou/ordali/bin ; setenv HOME /home /moumou/ ; ordali puts SampleNicoTree " set Msg "" catch {e xec tcsh -c $Cmd >& logLance} Msg if {$Msg ne "" && ! [string is integer -strict $Msg]} { puts "" puts "$Ms g" puts "" return; exit } } else { puts "

Ze final test !

" source /home/moumou/Nicolas/nicotree.tcl source /home/moumou/gscopublic/compgen.tcl source /home/moumou/ordali/src/ordali_admin.tcl set ::env(DISPLAY) ":1" set pre [info globals] LesDefauts set pro [info globals] puts "

Apres defauts : [lor $pre $pro]


" set OrdLibDir /home/moumou/ordali/lib set tk [package require Tk] puts $tk flush stdout set Svg [SampleNicoTree] puts $Svg } exit puts -nonewline " " }