gnuserv Emacs-20.7 のためのパッチ by masutaka
--- ./gnuserv-3.12.5-orig/gnuserv.el 2002-09-13 21:20:00.000000000 +0900 +++ ./gnuserv-3.12.5/gnuserv.el 2002-11-19 10:43:47.000000000 +0900 @@ -272,7 +272,10 @@ (make-variable-buffer-local 'gnuserv-minor-mode) ;;(pushnew '(gnuserv-minor-mode "Server") minor-mode-alist ;; :test 'equal) -(add-minor-mode 'gnuserv-minor-mode 'gnuserv-mode-line-string) +(if (fboundp 'add-minor-mode) + (add-minor-mode 'gnuserv-minor-mode 'gnuserv-mode-line-string) + (require 'alist) + (set-alist 'minor-mode-alist 'gnuserv-minor-mode (list gnuserv-mode-line-string))) ;; Sample gnuserv-frame functions