summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorNils Gey <denemo@nilsgey.de>2011-02-17 21:43:06 +0100
committerNils Gey <denemo@nilsgey.de>2011-02-17 21:43:06 +0100
commitbdf626256f556086c1ba1332459ce55e8c37f2b7 (patch)
tree4eeb7cf81ced0f76dcdc640c5e2cc3c2f02d6b47
parent6aaa64a4b4fa70e324e2de5e25a7672a5c4ffbde (diff)
New command: SelectMeasure to select current measure
-rw-r--r--actions/menus/MainMenu/EditMenu/Select/SelectMeasure23
1 files changed, 23 insertions, 0 deletions
diff --git a/actions/menus/MainMenu/EditMenu/Select/SelectMeasure b/actions/menus/MainMenu/EditMenu/Select/SelectMeasure
new file mode 100644
index 00000000..6cc12d93
--- /dev/null
+++ b/actions/menus/MainMenu/EditMenu/Select/SelectMeasure
@@ -0,0 +1,23 @@
+<?xml version="1.0"?>
+<Denemo>
+ <merge>
+ <title>A Denemo Keymap</title>
+ <author>AT, JRR, RTS</author>
+ <map>
+ <row>
+ <after>SelectColumn</after>
+ <action>SelectMeasure</action>
+ <scheme>(if (None?)
+ (d-SetMark)
+ (begin
+ (d-PushPosition)
+ (d-UnsetMark)
+ (GoToMeasureBeginning)
+ (RepeatProcWhileTest d-CursorRight (lambda () (not (Appending?))))
+ (d-PopPosition)))</scheme>
+ <label>Select Measure</label>
+ <tooltip>Create a selection for the entire current measure</tooltip>
+ </row>
+ </map>
+ </merge>
+</Denemo>