Revision: 44879
http://brlcad.svn.sourceforge.net/brlcad/?rev=44879&view=rev
Author: bhinesley
Date: 2011-06-10 02:57:53 +0000 (Fri, 10 Jun 2011)
Log Message:
-----------
Applied patch 3267991, submitted by myself. The commands 'q' and 'exit' are
already available in Archer; this adds the 'quit' synonym.
Modified Paths:
--------------
brlcad/trunk/src/tclscripts/archer/ArcherCore.tcl
Modified: brlcad/trunk/src/tclscripts/archer/ArcherCore.tcl
===================================================================
--- brlcad/trunk/src/tclscripts/archer/ArcherCore.tcl 2011-06-10 02:49:57 UTC
(rev 44878)
+++ brlcad/trunk/src/tclscripts/archer/ArcherCore.tcl 2011-06-10 02:57:53 UTC
(rev 44879)
@@ -220,6 +220,7 @@
method putmat {args}
method pwd {}
method q {args}
+ method quit {args}
method r {args}
method rcodes {args}
method red {args}
@@ -447,7 +448,7 @@
in inside item kill killall killrefs
killtree ls \
make make_bb make_pnts man mater
mirror move move_arb_edge move_arb_face \
mv mvall nmg_collapse nmg_simplify \
- ocenter opendb orotate oscale
otranslate p q packTree prefix protate pscale ptranslate \
+ ocenter opendb orotate oscale
otranslate p q quit packTree prefix protate pscale ptranslate \
push put put_comb putmat pwd r
rcodes red rfarb rm rmater \
rotate_arb_face search sed shader
shells tire title track \
unhide units unpackTree \
@@ -5385,6 +5386,10 @@
Close
}
+::itcl::body ArcherCore::quit {args} {
+ Close
+}
+
::itcl::body ArcherCore::r {args} {
eval gedWrapper r 0 1 1 1 $args
}
This was sent by the SourceForge.net collaborative development platform, the
world's largest Open Source development site.
------------------------------------------------------------------------------
EditLive Enterprise is the world's most technically advanced content
authoring tool. Experience the power of Track Changes, Inline Image
Editing and ensure content is compliant with Accessibility Checking.
http://p.sf.net/sfu/ephox-dev2dev
_______________________________________________
BRL-CAD Source Commits mailing list
[email protected]
https://lists.sourceforge.net/lists/listinfo/brlcad-commits
