X-Git-Url: https://git.creatis.insa-lyon.fr/pubgit/?a=blobdiff_plain;f=packages%2Ftoolsbbtk%2Fbbs%2Fappli%2FGUICreatePackage.bbs;h=7acc43da376462bf7b0498fb4e27a333a23c62b6;hb=80c01320fbade82fcc5bc972f2ed9f3e65239987;hp=1a57bc96f5e886dc6050246a2cfb8dd7c9345b2b;hpb=857e5e5bd003d20cb8bc4539b6fca4ca9d50929c;p=bbtk.git

diff --git a/packages/toolsbbtk/bbs/appli/GUICreatePackage.bbs b/packages/toolsbbtk/bbs/appli/GUICreatePackage.bbs
index 1a57bc9..7acc43d 100644
--- a/packages/toolsbbtk/bbs/appli/GUICreatePackage.bbs
+++ b/packages/toolsbbtk/bbs/appli/GUICreatePackage.bbs
@@ -14,11 +14,11 @@ 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)"
-    set name.In "NEW_PACKAGE"
+    set name.In "PACKAGE_NAME"
 
 new InputText author
     set author.Title "Author(s)           "
@@ -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
@@ -100,20 +100,19 @@ new ConcatStrings concatStrCommand
     set concatStrCommand.In1 " "
     connect dquote.Out			concatStrCommand.In2
     connect conf.BinPath		concatStrCommand.In3
-    connect conf.FileSeparator	concatStrCommand.In4
-    set						concatStrCommand.In5  "bbCreatePackage"
+    connect conf.FileSeparator		concatStrCommand.In4
+    set					concatStrCommand.In5  "bbCreatePackage"
     connect dquote.Out			concatStrCommand.In6
-    set						concatStrCommand.In7  " "
+    set					concatStrCommand.In7  " "
 
 new ConcatStrings concatStr
-    connect dquote.Out				concatStr.In1
-    connect  concatStrCommand.Out concatStr.In2
-    connect dirStr.Out				concatStr.In3
+    connect dquote.Out			concatStr.In1
+    connect concatStrCommand.Out 	concatStr.In2
+    connect dirStr.Out			concatStr.In3
     connect nameStr.Out			concatStr.In4 
-    connect authorStr.Out			concatStr.In5 
+    connect authorStr.Out		concatStr.In5 
     connect descriptionStr.Out		concatStr.In6
-    connect dquote.Out				concatStr.In7
-
+    connect dquote.Out			concatStr.In7
 
 new ExecSystemCommand command
     connect concatStr.Out command.In