Revision: 75384
http://sourceforge.net/p/brlcad/code/75384
Author: starseeker
Date: 2020-04-13 18:40:09 +0000 (Mon, 13 Apr 2020)
Log Message:
-----------
Numerical bindings for views aren't hard...
Modified Paths:
--------------
brlcad/trunk/src/tclscripts/mged/bindings.tcl
Modified: brlcad/trunk/src/tclscripts/mged/bindings.tcl
===================================================================
--- brlcad/trunk/src/tclscripts/mged/bindings.tcl 2020-04-13 17:39:09 UTC
(rev 75383)
+++ brlcad/trunk/src/tclscripts/mged/bindings.tcl 2020-04-13 18:40:09 UTC
(rev 75384)
@@ -112,8 +112,12 @@
bind $w i "winset $w; aip f; break"
bind $w I "winset $w; aip b; break"
bind $w p "winset $w; M 1 0 0; break"
+ bind $w 2 "winset $w; ae 35 -25; break"
bind $w 3 "winset $w; press 35,25; break"
bind $w 4 "winset $w; press 45,45; break"
+ bind $w 5 "winset $w; ae 145 25; break"
+ bind $w 6 "winset $w; ae 215 25; break"
+ bind $w 7 "winset $w; ae 325 25; break"
bind $w f "winset $w; press front; break"
bind $w t "winset $w; press top; break"
bind $w b "winset $w; press bottom; break"
@@ -217,8 +221,12 @@
bind $w i {}
bind $w I {}
bind $w p {}
+ bind $w 2 {}
bind $w 3 {}
bind $w 4 {}
+ bind $w 5 {}
+ bind $w 6 {}
+ bind $w 7 {}
bind $w f {}
bind $w t {}
bind $w b {}
@@ -261,7 +269,7 @@
bind $w <Control-t> {}
bind $w <Escape> {}
-
+
# The focus commands in the binding below are necessary to insure
# that .$id.t gets the event.
bind $w <KeyPress> "\
This was sent by the SourceForge.net collaborative development platform, the
world's largest Open Source development site.
_______________________________________________
BRL-CAD Source Commits mailing list
[email protected]
https://lists.sourceforge.net/lists/listinfo/brlcad-commits
