Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- ; send input to user (last talked to) (bitlbee, erc)
- (setq bitlbee-target "")
- (defun bitlbee-update-target (msg)
- (if (string= "&bitlbee" (buffer-name))
- (if (string-match "\\([^:]*: \\)" msg)
- (setq bitlbee-target (match-string 1 msg))
- (if (not (or
- (string-match "account" msg)
- (string-match "channel" msg)
- (string-match "chat" msg)
- (string-match "add" msg)
- (string-match "info" msg)
- (string-match "remove" msg)
- (string-match "block" msg)
- (string-match "allow" msg)
- (string-match "otr" msg)
- (string-match "set" msg)
- (string-match "help" msg)
- (string-match "save" msg)
- (string-match "rename" msg)
- (string-match "yes" msg)
- (string-match "no" msg)
- (string-match "qlist" msg)
- (string-match "register" msg)
- (string-match "identify" msg)
- (string-match "drop" msg)
- (string-match "blist" msg)
- (string-match "group" msg)
- (string-match "transfer" msg)
- ))
- (setq str (concat bitlbee-target msg))))))
- (add-hook 'erc-send-pre-hook 'bitlbee-update-target)
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement