(progn
(setq riece-ruby-exit-handler-alist
(delq entry riece-ruby-exit-handler-alist))
- (funcall (cdr entry) (car entry))))))
+ (funcall (cdr entry) (car entry))
+ (riece-ruby-clear name)))))
(defun riece-ruby-sentinel (process status)
(kill-buffer (process-buffer process)))
(index 0))
(while (< index length)
(if (eq (aref data index) ?\n)
- (aset data index " "))
+ (aset data index ? ))
(setq index (1+ index)))
(riece-send-string
(format "NOTICE %s :%s\r\n"
(riece-make-message (riece-current-nickname)
(riece-ruby-property name 'riece-ruby-target)
data
- 'notice))
- (riece-ruby-clear name)))
+ 'notice))))
(defun riece-ruby-display-message-function (message)
(if (and riece-ruby-enabled