X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=lisp%2Friece-eval-ruby.el;h=8595a579dbb0e6cddec93c5ea839dd3e36e31f4f;hb=a271e275f2fe897c4c70ce03e51a8fe8460dd384;hp=60d59b1b6a2e8394ecde20a6843f10df5bd8c74d;hpb=312bb821869adf84c0e0cc3fdfc879dc5b46f0c3;p=elisp%2Friece.git diff --git a/lisp/riece-eval-ruby.el b/lisp/riece-eval-ruby.el index 60d59b1..8595a57 100644 --- a/lisp/riece-eval-ruby.el +++ b/lisp/riece-eval-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: @@ -41,8 +41,6 @@ :type 'string :group 'riece-eval-ruby) -(defvar riece-eval-ruby-enabled nil) - (defconst riece-eval-ruby-description "Evaluate input string as a Ruby program.") @@ -67,7 +65,7 @@ 'notice)))) (defun riece-eval-ruby-display-message-function (message) - (if (and riece-eval-ruby-enabled + (if (and (get 'riece-eval-ruby 'riece-addon-enabled) (riece-message-own-p message) (string-match riece-eval-ruby-prefix-regexp (riece-message-text message))) @@ -88,12 +86,6 @@ (remove-hook 'riece-after-display-message-functions 'riece-eval-ruby-display-message-function)) -(defun riece-eval-ruby-enable () - (setq riece-eval-ruby-enabled t)) - -(defun riece-eval-ruby-disable () - (setq riece-eval-ruby-enabled nil)) - (provide 'riece-eval-ruby) ;;; riece-eval-ruby.el ends here