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

[Juanma Barranquero]

Index: emacs/lisp/msb.el
diff -c emacs/lisp/msb.el:1.44 emacs/lisp/msb.el:1.45
*** emacs/lisp/msb.el:1.44      Sun Jan 19 14:53:34 2003
--- emacs/lisp/msb.el   Tue Feb  4 06:48:50 2003
***************
*** 41,51 ****
  ;;   There are some constants for you to try here:
  ;;   msb--few-menus
  ;;   msb--very-many-menus (default)
! ;;   
  ;;   Look at the variable `msb-item-handling-function' for customization
  ;;   of the appearance of every menu item.  Try for instance setting
  ;;   it to `msb-alon-item-handler'.
! ;;  
  ;;   Look at the variable `msb-item-sort-function' for customization
  ;;   of sorting the menus.  Set it to t for instance, which means no
  ;;   sorting - you will get latest used buffer first.
--- 41,51 ----
  ;;   There are some constants for you to try here:
  ;;   msb--few-menus
  ;;   msb--very-many-menus (default)
! ;;
  ;;   Look at the variable `msb-item-handling-function' for customization
  ;;   of the appearance of every menu item.  Try for instance setting
  ;;   it to `msb-alon-item-handler'.
! ;;
  ;;   Look at the variable `msb-item-sort-function' for customization
  ;;   of sorting the menus.  Set it to t for instance, which means no
  ;;   sorting - you will get latest used buffer first.
***************
*** 320,326 ****
    :type 'string
    :set 'msb-custom-set
    :group 'msb)
!  
  (defvar msb-horizontal-shift-function '(lambda () 0)
    "*Function that specifies how many pixels to shift the top menu leftwards.")
  
--- 320,326 ----
    :type 'string
    :set 'msb-custom-set
    :group 'msb)
! 
  (defvar msb-horizontal-shift-function '(lambda () 0)
    "*Function that specifies how many pixels to shift the top menu leftwards.")
  
***************
*** 362,368 ****
                 (const :tag "Oldest first" nil))
    :set 'msb-custom-set
    :group 'msb)
!               
  (defcustom msb-files-by-directory nil
    "*Non-nil means that files should be sorted by directory.
  This is instead of the groups in `msb-menu-cond'."
--- 362,368 ----
                 (const :tag "Oldest first" nil))
    :set 'msb-custom-set
    :group 'msb)
! 
  (defcustom msb-files-by-directory nil
    "*Non-nil means that files should be sorted by directory.
  This is instead of the groups in `msb-menu-cond'."
***************
*** 729,735 ****
                              max-buffer-name-length)
                     buffer)
               (eval list-symbol)))))
!  
  (defsubst msb--choose-menu (buffer function-info-vector 
max-buffer-name-length)
    "Select the appropriate menu for BUFFER."
    ;; This is all side-effects, folks!
--- 729,735 ----
                              max-buffer-name-length)
                     buffer)
               (eval list-symbol)))))
! 
  (defsubst msb--choose-menu (buffer function-info-vector 
max-buffer-name-length)
    "Select the appropriate menu for BUFFER."
    ;; This is all side-effects, folks!