(defvar ri-program "fri") ;;friを使わないなら ;;(setq ri-program "ri") (defvar refe-program "~/bin/refe.sh") (defvar ruby-all-methods nil) (defvar my-ruby-reference-last-word "") (defun read-ruby-document (document com) "Open each ruby's ruby-document on other window" (let ((buf "*ruby document*")) (if (equal com "") (shell-command (concat document " -l") buf) (shell-command (concat document " " com) buf