emacs-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[Emacs-diffs] Changes to emacs/lisp/emacs-lisp/easy-mmode.el


From: Eli Zaretskii
Subject: [Emacs-diffs] Changes to emacs/lisp/emacs-lisp/easy-mmode.el
Date: Sun, 08 May 2005 15:38:08 -0400

Index: emacs/lisp/emacs-lisp/easy-mmode.el
diff -c emacs/lisp/emacs-lisp/easy-mmode.el:1.60 
emacs/lisp/emacs-lisp/easy-mmode.el:1.61
*** emacs/lisp/emacs-lisp/easy-mmode.el:1.60    Sat May  7 15:05:00 2005
--- emacs/lisp/emacs-lisp/easy-mmode.el Sun May  8 19:38:06 2005
***************
*** 61,69 ****
  If provided, LIGHTER will be used to help choose capitalization by,
  replacing its case-insensitive matches with the literal string in LIGHTER."
    (let* ((case-fold-search t)
!        ;; Produce "Foo-Bar Minor mode" from foo-bar-minor-mode.
         (name (concat (replace-regexp-in-string
!                       ;; "Foo-Bar-Minor" -> "Foo-Bar minor"
                        "-Minor" " minor"
                        ;; "foo-bar-minor" -> "Foo-Bar-Minor"
                        (capitalize (replace-regexp-in-string
--- 61,71 ----
  If provided, LIGHTER will be used to help choose capitalization by,
  replacing its case-insensitive matches with the literal string in LIGHTER."
    (let* ((case-fold-search t)
!        ;; Produce "Foo-Bar minor mode" from foo-bar-minor-mode.
         (name (concat (replace-regexp-in-string
!                       ;; If the original mode name included "-minor" (some
!                       ;; of them don't, e.g. auto-revert-mode), then
!                       ;; replace it with " minor".
                        "-Minor" " minor"
                        ;; "foo-bar-minor" -> "Foo-Bar-Minor"
                        (capitalize (replace-regexp-in-string




reply via email to

[Prev in Thread] Current Thread [Next in Thread]