From: Eduardo Davila <Eduardo.Davila@creatis.insa-lyon.fr>
Date: Mon, 20 Feb 2012 10:40:07 +0000 (+0000)
Subject: *** empty log message ***
X-Git-Url: https://git.creatis.insa-lyon.fr/pubgit/?a=commitdiff_plain;h=6ca1e9e935cdf36d2db70451088e87c09550564b;p=bbtk.git

*** empty log message ***
---

diff --git a/packages/toolsbbtk/bbs/appli/GUICreateBlackBox.bbs b/packages/toolsbbtk/bbs/appli/GUICreateBlackBox.bbs
index 0a83f8a..38cbd77 100644
--- a/packages/toolsbbtk/bbs/appli/GUICreateBlackBox.bbs
+++ b/packages/toolsbbtk/bbs/appli/GUICreateBlackBox.bbs
@@ -163,11 +163,11 @@ new ConcatStrings descriptionStr
 # Command string creation
 new ConcatStrings concatStrCommand
     set concatStrCommand.In1 " "
-    connect dquote.Out			concatStrCommand.In2
-    connect conf.BinPath		concatStrCommand.In3
-    connect conf.FileSeparator	concatStrCommand.In4
+#EED-20-02-2012    connect dquote.Out			concatStrCommand.In2
+#EED-20-02-2012    connect conf.BinPath		concatStrCommand.In3
+#EED-20-02-2012    connect conf.FileSeparator	concatStrCommand.In4
     set		concatStrCommand.In5  "bbCreateBlackBox"
-    connect dquote.Out			concatStrCommand.In6
+#EED-20-02-2012    connect dquote.Out			concatStrCommand.In6
     set		concatStrCommand.In7  " "
 
 # Params string creation
@@ -182,10 +182,10 @@ new ConcatStrings concatStrParam
     
 # Command + parameters string creation
 new ConcatStrings concatStr
-    connect dquote.Out				concatStr.In1
+#EED-20-02-2012    connect dquote.Out				concatStr.In1
     connect concatStrCommand.Out 	concatStr.In2
     connect concatStrParam.Out 		concatStr.In3
-    connect dquote.Out				concatStr.In4
+#EED-20-02-2012    connect dquote.Out				concatStr.In4
 
 # Box which executes the command
 new ExecSystemCommand command
diff --git a/packages/toolsbbtk/bbs/appli/GUICreatePackage.bbs b/packages/toolsbbtk/bbs/appli/GUICreatePackage.bbs
index 15f4a8d..8a56b2e 100644
--- a/packages/toolsbbtk/bbs/appli/GUICreatePackage.bbs
+++ b/packages/toolsbbtk/bbs/appli/GUICreatePackage.bbs
@@ -28,9 +28,9 @@ new InputText description
     set description.Title "Description            (html format)"
     set description.In "_description_"
 
-new CommandButton cancelButton
-    set cancelButton.In "print **CANCEL**"
-    set cancelButton.Label "Cancel"
+#new CommandButton cancelButton
+#    set cancelButton.In "print **CANCEL**"
+#    set cancelButton.Label "Cancel"
 
 new CommandButton createButton
     set createButton.In "print $concatStr.Out$; exec command;"
@@ -39,7 +39,7 @@ new CommandButton createButton
 
 new LayoutLine buttons
     set buttons.Orientation Horizontal
-    connect cancelButton.Widget buttons.Widget1
+#    connect cancelButton.Widget buttons.Widget1
     connect createButton.Widget buttons.Widget2
 
 new LayoutLine main
@@ -98,21 +98,21 @@ new ConcatStrings descriptionStr
 
 new ConcatStrings concatStrCommand
     set concatStrCommand.In1 " "
-    connect dquote.Out			concatStrCommand.In2
-    connect conf.BinPath		concatStrCommand.In3
-    connect conf.FileSeparator		concatStrCommand.In4
+#EED-20-02-2012    connect dquote.Out			concatStrCommand.In2
+#EED-20-02-2012    connect conf.BinPath		concatStrCommand.In3
+#EED-20-02-2012    connect conf.FileSeparator		concatStrCommand.In4
     set					concatStrCommand.In5  "bbCreatePackage"
-    connect dquote.Out			concatStrCommand.In6
+#EED-20-02-2012    connect dquote.Out			concatStrCommand.In6
     set					concatStrCommand.In7  " "
 
 new ConcatStrings concatStr
-    connect dquote.Out			concatStr.In1
+#EED-20-02-2012    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 descriptionStr.Out		concatStr.In6
-    connect dquote.Out			concatStr.In7
+#EED-20-02-2012    connect dquote.Out			concatStr.In7
 
 new ExecSystemCommand command
     connect concatStr.Out command.In