diff --git a/alliance/share/etc/algue/alliance.tk b/alliance/share/etc/algue/alliance.tk index 2726ca44..ce1736db 100644 --- a/alliance/share/etc/algue/alliance.tk +++ b/alliance/share/etc/algue/alliance.tk @@ -26,7 +26,7 @@ } } - set alcgraph $env(ALLIANCE_TOP)/algue + set alcgraph $env(ALLIANCE_TOP)/etc/algue lappend auto_path $alcgraph @@ -224,7 +224,7 @@ proc config_binaire { executable file_config } { global liste_variables global dir_env_file -set dir_env_file $env(ALLIANCE_TOP)/algue +set dir_env_file $env(ALLIANCE_TOP)/etc/algue global liste_topack @@ -713,23 +713,17 @@ eval "exec chmod 755 $filewrite" pack $w.haut.1.c -expand true -side left -fill both - set chemin $env(ALLIANCE_TOP)/algue/asim.gif + set chemin $env(ALLIANCE_TOP)/etc/algue/asim.gif set imh [image create photo -file $chemin] - $w.haut.1.c create image 70 55 -image $imh + $w.haut.1.c create image 70 40 -image $imh - set chemin $env(ALLIANCE_TOP)/algue/asimtxt.gif - set imh [image create photo -file $chemin] - - $w.haut.1.c create image 70 15 -image $imh - - - set chemin $env(ALLIANCE_TOP)/algue/alliance.gif + set chemin $env(ALLIANCE_TOP)/etc/algue/alliance.gif set imh [image create photo -file $chemin] $w.haut.1.c create image 370 40 -image $imh - set chemin $env(ALLIANCE_TOP)/algue/lip6.gif + set chemin $env(ALLIANCE_TOP)/etc/algue/lip6.gif set imh [image create photo -file $chemin] $w.haut.1.c create image 660 40 -image $imh @@ -762,7 +756,7 @@ eval "exec chmod 755 $filewrite" set defautx1 55; set x1 $defautx1 - set file_config "$env(ALLIANCE_TOP)/algue/main.cfg" + set file_config "$env(ALLIANCE_TOP)/etc/algue/main.cfg" canvas $w.princ.1.c -relief flat -borderwidth 0 -background #fff \ @@ -854,7 +848,7 @@ global widthlabel heigthlabel set paramlaunch(exit) "EXIT" $w.bot.switch configure -text $paramlaunch(changelang) $w.bot.quit configure -text $paramlaunch(exit) - set file_to_read $env(ALLIANCE_TOP)/algue/maine.cfg + set file_to_read $env(ALLIANCE_TOP)/etc/algue/maine.cfg } "anglais" { set currentlang "francais" @@ -862,7 +856,7 @@ global widthlabel heigthlabel set paramlaunch(exit) "SORTIE" $w.bot.switch configure -text $paramlaunch(changelang) $w.bot.quit configure -text $paramlaunch(exit) - set file_to_read $env(ALLIANCE_TOP)/algue/main.cfg + set file_to_read $env(ALLIANCE_TOP)/etc/algue/main.cfg } } @@ -879,7 +873,7 @@ global widthlabel heigthlabel set defautx1 55; set x1 $defautx1 - set file_config "$env(ALLIANCE_TOP)/algue/main.cfg" + set file_config "$env(ALLIANCE_TOP)/etc/algue/main.cfg" if [catch {open $file_to_read r} fichier] { set mesg1 "L'erreur est humaine" diff --git a/alliance/share/etc/algue/asim.gif b/alliance/share/etc/algue/asim.gif index 504a57a6..feecbfc2 100644 Binary files a/alliance/share/etc/algue/asim.gif and b/alliance/share/etc/algue/asim.gif differ diff --git a/alliance/share/etc/algue/asimtxt.gif b/alliance/share/etc/algue/asimtxt.gif deleted file mode 100644 index 56d6610a..00000000 Binary files a/alliance/share/etc/algue/asimtxt.gif and /dev/null differ