[Nsclspectcl-cvscommits] SF.net SVN: nsclspectcl:[1954] trunk/SpecTcl

[<ro...@us...>]

Revision: 1954
          http://nsclspectcl.svn.sourceforge.net/nsclspectcl/?rev=1954&view=rev
Author:   ron-fox
Date:     2011-12-30 20:07:58 +0000 (Fri, 30 Dec 2011)
Log Message:
-----------
Build notebook and installer for new tree guil

Modified Paths:
--------------
    trunk/SpecTcl/Gui/folderGui.tcl
    trunk/SpecTcl/Makefile.am
    trunk/SpecTcl/configure.in

Modified: trunk/SpecTcl/Gui/folderGui.tcl
===================================================================
--- trunk/SpecTcl/Gui/folderGui.tcl	2011-12-30 20:07:47 UTC (rev 1953)
+++ trunk/SpecTcl/Gui/folderGui.tcl	2011-12-30 20:07:58 UTC (rev 1954)
@@ -1114,12 +1114,16 @@
     pack $parent.b -fill both -expand 1
 
 
-    label $parent.statusline1 -justify left -text {Title:  N/A     Run Number: N/A}
-    label $parent.statusline2 -justify left -text {Data Source:  Test (inactive)   0 buffers analyzed  100% efficient}
-    pack $parent.statusline1 -fill x -expand 0 -anchor w
-    pack $parent.statusline2 -fill x -expand 0 -anchor w
+    if {$top eq ""} {
+	
+	label $parent.statusline1 -justify left -text {Title:  N/A     Run Number: N/A}
+	label $parent.statusline2 -justify left -text {Data Source:  Test (inactive)   0 buffers analyzed  100% efficient}
+	pack $parent.statusline1 -fill x -expand 0 -anchor w
+	pack $parent.statusline2 -fill x -expand 0 -anchor w
+	
+	updateStatus 1000
+    }
+    set ::SpecTclIODwellMax 100
 
-    set ::SpecTclIODwellMax 100
-    updateStatus 1000
     preferences::readPrefs
 }

Modified: trunk/SpecTcl/Makefile.am
===================================================================
--- trunk/SpecTcl/Makefile.am	2011-12-30 20:07:47 UTC (rev 1953)
+++ trunk/SpecTcl/Makefile.am	2011-12-30 20:07:58 UTC (rev 1954)
@@ -3,7 +3,7 @@
 	TCL Events Gates Sorter SpectrumIO Filter Analysis\
 	DecoderRing  TreeParam \
 	Fits SpecTcl \
-	contrib TestFiles Gui splash filtsplit calibratedparams
+	contrib TestFiles Gui splash filtsplit calibratedparams treegui
 
 # Gri TestFiles need to be figured out still..
 

Modified: trunk/SpecTcl/configure.in
===================================================================
--- trunk/SpecTcl/configure.in	2011-12-30 20:07:47 UTC (rev 1953)
+++ trunk/SpecTcl/configure.in	2011-12-30 20:07:58 UTC (rev 1954)
@@ -923,5 +923,7 @@
 	 SpecTcl/Makefile \
 	 contrib/Makefile contrib/scriptable/Makefile \
 	 TestFiles/Makefile \
-	 Gui/Makefile splash/Makefile filtsplit/Makefile doc/Makefile \
+	 Gui/Makefile splash/Makefile \
+	 treegui/Makefile \
+	 filtsplit/Makefile doc/Makefile \
 	 calibratedparams/Makefile)

This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.