[Emacs-diffs] Changes to emacs/lisp/hippie-exp.el

[Pavel Janík]

Index: emacs/lisp/hippie-exp.el
diff -c emacs/lisp/hippie-exp.el:1.23 emacs/lisp/hippie-exp.el:1.24
*** emacs/lisp/hippie-exp.el:1.23       Mon Jul 16 08:22:58 2001
--- emacs/lisp/hippie-exp.el    Thu Dec 20 13:41:15 2001
***************
*** 263,269 ****
  (defcustom hippie-expand-only-buffers ()
    "*A list specifying the only buffers to search (in addition to current).
  Can contain both regexps matching buffer names (as strings) and major modes
! \(as atoms). If non-NIL, this variable overrides the variable
  `hippie-expand-ignore-buffers'."
    :type '(repeat (choice regexp (symbol :tag "Major Mode")))
    :group 'hippie-expand)
--- 263,269 ----
  (defcustom hippie-expand-only-buffers ()
    "*A list specifying the only buffers to search (in addition to current).
  Can contain both regexps matching buffer names (as strings) and major modes
! \(as atoms).  If non-nil, this variable overrides the variable
  `hippie-expand-ignore-buffers'."
    :type '(repeat (choice regexp (symbol :tag "Major Mode")))
    :group 'hippie-expand)
***************
*** 382,388 ****
  
  
  ;; Check if STR is a member of LST.
! ;; Transform to the final case if optional TRANS-CASE is non-NIL.
  (defun he-string-member (str lst &optional trans-case)
    (if str
        (member (if (and trans-case
--- 382,388 ----
  
  
  ;; Check if STR is a member of LST.
! ;; Transform to the final case if optional TRANS-CASE is non-nil.
  (defun he-string-member (str lst &optional trans-case)
    (if str
        (member (if (and trans-case