(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)))
(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