Method code for $robot.add_reaction()

[Turn off line numbering]

---

  1: arg @args;
  2: var r, id;
  3: 
  4: // Make sure the sender is a writer, added by Sean
  5: (> .perms(sender()) <);
  6: 
  7: // make sure it doesn't already exist..
  8: for r in (reactions || #[]) {
  9:     if (r[2][2] == args[2]) {
 10:         if (r[2] == args)
 11:             return r[1];
 12:     }
 13: }
 14: (> .check_reaction_args(@args) <);
 15: reactions = dict_add(reactions || #[], ++last_id, args);
 16: 
 17: // $#Edited: 20 Feb 98 23:14 $user_sean

---

["// Created 26-Mar-1995 as a part of ColdCore, see: @help Credit"]

Method Ancestry Override:

 ----   91 $robot.add_reaction(@args)
 ----   76 $has_reactions.add_reaction(@args)