X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=lisp%2Friece-ruby.el;h=699ddd08c3db4ce50a5d84373e3c4c4a726f6173;hb=d464dd4cda287ad1d4722ddf565b60ebefdc3471;hp=dbbecf8f493f09fc7846605493a85b6469aa02ef;hpb=5cb6592cc59fd63678812d84b1883845be8933fd;p=elisp%2Friece.git diff --git a/lisp/riece-ruby.el b/lisp/riece-ruby.el index dbbecf8..699ddd0 100644 --- a/lisp/riece-ruby.el +++ b/lisp/riece-ruby.el @@ -19,8 +19,8 @@ ;; You should have received a copy of the GNU General Public License ;; along with GNU Emacs; see the file COPYING. If not, write to the -;; Free Software Foundation, Inc., 59 Temple Place - Suite 330, -;; Boston, MA 02111-1307, USA. +;; Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor, +;; Boston, MA 02110-1301, USA. ;;; Commentary: @@ -52,6 +52,7 @@ (defgroup riece-ruby nil "Interact with Ruby interpreter." + :prefix "riece-" :group 'riece) (defcustom riece-ruby-command "ruby" @@ -242,7 +243,7 @@ Use `riece-ruby-set-property' to set this variable.") (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))))))