(buffers (intern (concat global-mode-name "-buffers")))
    !    (buffers-check (intern (concat global-mode-name "-check-buffers")))
    !    (cmmh (intern (concat global-mode-name "-cmmh")))
    !    (stored-mode (intern (concat (symbol-name mode) "-stored-mode"))))

The code would be easier to read if these four variables were renamed
to

         (thismode-enable-in-buffers (intern (concat global-mode-name 
"-enable-in-buffers")))
    !    (thismode-check-buffers (intern (concat global-mode-name 
"-check-buffers")))
    !    (thismode-cmmh (intern (concat global-mode-name "-cmmh")))
    !    (thismode-recorded-major-mode (intern (concat (symbol-name mode) 
"-recorded-major-mode"))))


Meanwhile, I see that the function named ,buffers and the function
named ,buffers-check are almost identical.  The only difference, it
appears, is that the latter sets ,buffers to nil.  Why not make
it call the other one?


_______________________________________________
Emacs-devel mailing list
Emacs-devel@gnu.org
http://lists.gnu.org/mailman/listinfo/emacs-devel

Reply via email to