*** empty log message ***

[bbtk.git] / packages / toolsbbtk / bbs / appli / GUICreatePackage.bbs

diff --git a/packages/toolsbbtk/bbs/appli/GUICreatePackage.bbs b/packages/toolsbbtk/bbs/appli/GUICreatePackage.bbs
index 896fe064f2e56a209b04724d9ec4da436b06611b..7acc43da376462bf7b0498fb4e27a333a23c62b6 100644 (file)
--- 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
@@ -107,14 +107,13 @@ new ConcatStrings concatStrCommand
 
 new ConcatStrings concatStr
     connect dquote.Out                 concatStr.In1
-    connect  concatStrCommand.Out      concatStr.In2
+    connect concatStrCommand.Out       concatStr.In2
     connect dirStr.Out                 concatStr.In3
     connect nameStr.Out                        concatStr.In4 
     connect authorStr.Out              concatStr.In5 
     connect descriptionStr.Out         concatStr.In6
     connect dquote.Out                 concatStr.In7
 
-
 new ExecSystemCommand command
     connect concatStr.Out command.In