[Plplot-cvs] SF.net SVN: plplot:[11045] trunk/examples/tcl

[<ai...@us...>]

Revision: 11045
          http://plplot.svn.sourceforge.net/plplot/?rev=11045&view=rev
Author:   airwin
Date:     2010-05-31 19:46:51 +0000 (Mon, 31 May 2010)

Log Message:
-----------
Put call to plinit in x01 while replacing plstar (which internally calls the
equivalent of plinit) with plssub in x01.tcl.  This fix allows
test_tk_standard_examples (a dependency of the test_interactive target) to
work again since tkdemos.tcl (run indirectly by test_tk_standard_examples)
assumes no plinit-like commands are in x??.tcl.

This fix has also been tested with test_diff_psc and the standalone run
of x01 is still consistent with its C counterpart.

Modified Paths:
--------------
    trunk/examples/tcl/x01
    trunk/examples/tcl/x01.tcl

Modified: trunk/examples/tcl/x01
===================================================================
--- trunk/examples/tcl/x01	2010-05-31 17:31:25 UTC (rev 11044)
+++ trunk/examples/tcl/x01	2010-05-31 19:46:51 UTC (rev 11045)
@@ -17,5 +17,6 @@
 plgver ver
 puts [format "PLplot library version: %s" $ver ]
 
+plinit
 x01
 plend

Modified: trunk/examples/tcl/x01.tcl
===================================================================
--- trunk/examples/tcl/x01.tcl	2010-05-31 17:31:25 UTC (rev 11044)
+++ trunk/examples/tcl/x01.tcl	2010-05-31 19:46:51 UTC (rev 11045)
@@ -11,7 +11,7 @@
     # first, this call to pladv is absolutely essential to finish the
     # preceding page.
 
-    $w cmd plstar 2 2
+    $w cmd plssub 2 2
 
     #$w cmd pladv 0
     #$w cmd plssub 2 2


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