<?xml version="1.0"?>
<Denemo>
  <merge>
    <title>A Denemo Keymap</title>
    <author>AT, JRR, RTS</author>
    <map>
      <row>
        <action>ApplyToSelection</action>
        <scheme>;;;ApplyToSelection
(if (not DenemoKeypressActivatedCommand)
	(d-WarningDialog "Close this dialog, then press a shortcut key/shortcut keys to apply the command to every object in the selection\n\nThis command will execute the command you give once with the cursor on  each object in the selection. E.g. if you select 8 notes and give a shortcut for ZoomIn it will zoom 8 times."))
(let ()
	(define var (d-GetCommandFromUser))
	(if var (SingleAndSelectionSwitcher (string-append "(d-" var ")")))
)
</scheme>
        <label>Apply Shortcut to Objects in Selection</label>
        <tooltip>Followed by a keyboard shortcut: applies the shortcut with the cursor successively on each object in the selection.</tooltip>
      </row>
    </map>
  </merge>
</Denemo>
