X-Git-Url: https://git.creatis.insa-lyon.fr/pubgit/?a=blobdiff_plain;f=packages%2Ftoolsbbtk%2Fbbs%2Fappli%2FGUICreatePackage.bbs;h=15f4a8d17f1998cc81d3809012e9c0f74f800b34;hb=071ccbff9c9135e6f39fbd17d129f191cf76d202;hp=8e006e9ebde0f7e48e4c5368f253cbdd803a1884;hpb=ecbed4dd1bba36ddf4dd82d71eec9bc8844da655;p=bbtk.git

diff --git a/packages/toolsbbtk/bbs/appli/GUICreatePackage.bbs b/packages/toolsbbtk/bbs/appli/GUICreatePackage.bbs
index 8e006e9..15f4a8d 100644
--- a/packages/toolsbbtk/bbs/appli/GUICreatePackage.bbs
+++ b/packages/toolsbbtk/bbs/appli/GUICreatePackage.bbs
@@ -14,7 +14,7 @@ new OutputText dirOutput
   connect dir.Out dirOutput.In
 
 new OutputText windowTitle
-  set windowTitle.In "Package informations"
+  set windowTitle.In "Create new package folder in :"
 
 new InputText name
     set name.Title "Name         (1 word)"
@@ -50,9 +50,9 @@ new LayoutLine main
     connect description.Widget main.Widget5
     connect buttons.Widget main.Widget6
     set main.WinTitle "Create new black box package"
-    set main.WinDialog true
+#    set main.WinDialog true
     set main.WinWidth 400 
-    set main.WinHeight 250 
+    set main.WinHeight 400 
 
 new MultipleInputs close
     connect close.Out main.WinClose
@@ -114,15 +114,14 @@ new ConcatStrings concatStr
     connect descriptionStr.Out		concatStr.In6
     connect dquote.Out			concatStr.In7
 
-
 new ExecSystemCommand command
     connect concatStr.Out command.In
 
 /*
-new OutputText FinalMessage
-set FinalMessage.WinWidth 100
-set FinalMessage.WinHeight 100
-set FinalMessage.In "Done !"
+#new OutputText FinalMessage
+#set FinalMessage.WinWidth 100
+#set FinalMessage.WinHeight 100
+#set FinalMessage.In "Done !"
 */
 
 exec dir