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