Method code for $has_commands.del_shortcut()

[Turn off line numbering]
  1: arg shortcut;
  2: var value;
  3: 
  4: (> .perms(sender()) <);
  5: 
  6: // remove the cards, just use the raw template
  7: shortcut = strsed("-%1 %2", "%[0-9]+", "*");
  8: 
  9: // delete it...
 10: value = (| shortcuts.del(shortcut) |);
 11: if (type(value) != 'dictionary)
 12:     throw(~shortcutnf, "Shortcut \"" + shortcut + "\" is not defined on this object.");
 13: shortcuts = value;

// Created 27-Mar-1995 as a part of ColdCore, see: @help Credit

Tlon