diff options
author | Nils Gey <denemo@nilsgey.de> | 2011-02-17 21:43:06 +0100 |
---|---|---|
committer | Nils Gey <denemo@nilsgey.de> | 2011-02-17 21:43:06 +0100 |
commit | bdf626256f556086c1ba1332459ce55e8c37f2b7 (patch) | |
tree | 4eeb7cf81ced0f76dcdc640c5e2cc3c2f02d6b47 | |
parent | 6aaa64a4b4fa70e324e2de5e25a7672a5c4ffbde (diff) |
New command: SelectMeasure to select current measure
-rw-r--r-- | actions/menus/MainMenu/EditMenu/Select/SelectMeasure | 23 |
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> |