Changeset 1573 for trunk

Timestamp:

Oct 1, 2009, 9:01:55 AM (15 years ago)

Author:

gah

Message:

start of print dialog for xy graphs

Location:

trunk/gui/scripts

Files:

• Makefile.in (modified) (1 diff)
• xyprint.tcl (modified) (3 diffs)

trunk/gui/scripts/Makefile.in

@@ -110 +110 @@
                 $(srcdir)/visviewer.tcl \
                 $(srcdir)/xylegend.tcl \
+                $(srcdir)/xyprint.tcl \
                 $(srcdir)/xyresult.tcl
 

trunk/gui/scripts/xyprint.tcl

@@ -52 +52 @@
     # 
     foreach axis [$clone axis names] {
-        $clone axis configure $axis -ticklength 5 -loose yes -min "" -max ""
+        $clone axis configure $axis -ticklength 5 -loose always 
+#-min "" -max ""
         $clone axis configure $axis -tickfont "Helvetica 10" \
             -titlefont "Helvetica 10" 
@@ -123 +124 @@
     # Pen component
     foreach pen [$orig pen names] {
-puts stderr pen=$pen
         if { [$clone pen name $pen] == "" } {
             $clone pen create $pen
@@ -137 +137 @@
     # Element component
     foreach elem [$orig element names] {
-puts stderr elem=$elem
         $clone element create $elem
         #CopyBindings element $orig $clone $elem