(defgroup riece-ruby nil
"Interact with Ruby interpreter."
+ :prefix "riece-"
:group 'riece)
(defcustom riece-ruby-command "ruby"
(format "%s-output-handler" name))
(cdr handler-entry) name output time)
(if entry
- (setcdr entry (cons output (cdr entry)))
+ (setcdr entry (cons (cons output time) (cdr entry)))
(setq riece-ruby-output-queue-alist
(cons (list name (cons output time))
riece-ruby-output-queue-alist))))))
(eq (process-status riece-ruby-process) 'run))
(let (selective-display
(coding-system-for-write 'binary)
- (coding-system-for-read 'binary)
- process-connection-type)
+ (coding-system-for-read 'binary))
(setq riece-ruby-process
(apply #'start-process "riece-ruby" (generate-new-buffer " *Ruby*")
riece-ruby-command