Revision: 56229
          http://sourceforge.net/p/brlcad/code/56229
Author:   brlcad
Date:     2013-07-26 03:32:02 +0000 (Fri, 26 Jul 2013)
Log Message:
-----------
more .pl to .plot3 conversion

Modified Paths:
--------------
    brlcad/trunk/src/tclscripts/helplib.tcl
    brlcad/trunk/src/tclscripts/lib/Drawable.tcl
    brlcad/trunk/src/tclscripts/lib/Ged.tcl
    brlcad/trunk/src/tclscripts/mged/plot.tcl
    brlcad/trunk/src/tclscripts/mged/points.tcl

Modified: brlcad/trunk/src/tclscripts/helplib.tcl
===================================================================
--- brlcad/trunk/src/tclscripts/helplib.tcl     2013-07-25 21:31:22 UTC (rev 
56228)
+++ brlcad/trunk/src/tclscripts/helplib.tcl     2013-07-26 03:32:02 UTC (rev 
56229)
@@ -185,7 +185,7 @@
 set helplib_data(dgo_nirt)             {{[nirt(1) options] [x y z]}    {trace 
a single ray from current view}}
 set helplib_data(dgo_observer)         {{cmd [args]} {Attach/detach observer 
to/from list}}
 set helplib_data(dgo_open)             {{name wdb_obj} {open/create a new 
drawable geometry object}}
-set helplib_data(dgo_overlay)          {{file.pl [name]}       {overlay the 
specified 2D/3D UNIX plot file}}
+set helplib_data(dgo_overlay)          {{file.plot3 [name]}    {overlay the 
specified 2D/3D UNIX plot file}}
 set helplib_data(dgo_qray)             {{subcommand}   {get/set query_ray 
characteristics}}
 set helplib_data(dgo_report)           {{[lvl]} {print solid table & vector 
list}}
 set helplib_data(dgo_rt)               {{[options] [-- objects]}       {do 
raytrace of view or specified objects}}

Modified: brlcad/trunk/src/tclscripts/lib/Drawable.tcl
===================================================================
--- brlcad/trunk/src/tclscripts/lib/Drawable.tcl        2013-07-25 21:31:22 UTC 
(rev 56228)
+++ brlcad/trunk/src/tclscripts/lib/Drawable.tcl        2013-07-26 03:32:02 UTC 
(rev 56229)
@@ -252,7 +252,7 @@
     $help add illum            {{name} {illuminate object}}
     $help add label            {{[-n] obj} {label objects}}
     $help add nirt             {{[nirt(1) options] [x y z]}    {trace a single 
ray from current view}}
-    $help add overlay          {{file.pl [name]} {overlay the specified 2D/3D 
UNIX plot file}}
+    $help add overlay          {{file.plot3 [name]} {overlay the specified 
2D/3D UNIX plot file}}
     $help add qray             {{subcommand}   {get/set query_ray 
characteristics}}
     $help add report           {{[lvl]} {print solid table & vector list}}
     $help add rt               {{[options] [-- objects]} {do raytrace of view 
or specified objects}}

Modified: brlcad/trunk/src/tclscripts/lib/Ged.tcl
===================================================================
--- brlcad/trunk/src/tclscripts/lib/Ged.tcl     2013-07-25 21:31:22 UTC (rev 
56228)
+++ brlcad/trunk/src/tclscripts/lib/Ged.tcl     2013-07-26 03:32:02 UTC (rev 
56229)
@@ -6175,7 +6175,7 @@
     $help add orotate          {{x y z} {rotate object}}
     $help add oscale           {{sf} {scale object}}
     $help add otranslate       {{x y z} {translate object}}
-    $help add overlay          {{file.pl [name]} {overlay the specified 2D/3D 
UNIX plot file}}
+    $help add overlay          {{file.plot3 [name]} {overlay the specified 
2D/3D UNIX plot file}}
     $help add pathlist         {{name(s)}      {list all paths from name(s) to 
leaves}}
     $help add paths            {{pattern} {lists all paths matching input 
path}}
     $help add perspective      {{[angle]} {set/get the perspective angle}}

Modified: brlcad/trunk/src/tclscripts/mged/plot.tcl
===================================================================
--- brlcad/trunk/src/tclscripts/mged/plot.tcl   2013-07-25 21:31:22 UTC (rev 
56228)
+++ brlcad/trunk/src/tclscripts/mged/plot.tcl   2013-07-26 03:32:02 UTC (rev 
56229)
@@ -51,7 +51,7 @@
     }
 
     if ![info exists pl_control($id,file)] {
-       regsub \.g$ [_mged_opendb] .pl default_file
+       regsub \.g$ [_mged_opendb] .plot3 default_file
        set pl_control($id,file) $default_file
     }
 

Modified: brlcad/trunk/src/tclscripts/mged/points.tcl
===================================================================
--- brlcad/trunk/src/tclscripts/mged/points.tcl 2013-07-25 21:31:22 UTC (rev 
56228)
+++ brlcad/trunk/src/tclscripts/mged/points.tcl 2013-07-26 03:32:02 UTC (rev 
56229)
@@ -391,8 +391,8 @@
     eval "$cmd"
 
     close $fd
-    set asc2pl [file join [bu_brlcad_root "bin"] asc-pl]
-    exec "$asc2pl < pipe$pipe_number.plasc > pipe$pipe_number.pl"
+    set asc2plot3 [file join [bu_brlcad_root "bin"] asc-plot3]
+    exec "$asc2plot3 < pipe$pipe_number.plasc > pipe$pipe_number.plot3"
 
     incr pipe_number
 
@@ -697,9 +697,9 @@
        set c "Q"
     }
     close $fd
-    set asc2pl [file join [bu_brlcad_root "bin"] asc-pl]
-    exec "$asc2pl < pipe.asc > pipe.pl"
-    overlay pipe.pl
+    set asc2plot3 [file join [bu_brlcad_root "bin"] asc-plot3]
+    exec "$asc2plot3 < pipe.asc > pipe.plot3"
+    overlay pipe.plot3
     file delete pipe.asc
 
     pipe $pipe_pts

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


------------------------------------------------------------------------------
See everything from the browser to the database with AppDynamics
Get end-to-end visibility with application monitoring from AppDynamics
Isolate bottlenecks and diagnose root cause in seconds.
Start your free trial of AppDynamics Pro today!
http://pubads.g.doubleclick.net/gampad/clk?id=48808831&iu=/4140/ostg.clktrk
_______________________________________________
BRL-CAD Source Commits mailing list
[email protected]
https://lists.sourceforge.net/lists/listinfo/brlcad-commits

Reply via email to