Show
Ignore:
Timestamp:
2006年05月13日 11時31分18秒 (3 years ago)
Author:
miyoshi
Message:

Sync up with Emacs CVS HEAD.

Files:

Legend:

Unmodified
Added
Removed
Modified
Copied
Moved
  • trunk/lisp/speedbar.el

    r4058 r4079  
    25302530                (speedbar-message nil)))) 
    25312531      ;; Else, we can do a short cut.  No text cache. 
    2532       (let ((cbd (expand-file-name default-directory)) 
    2533             ) 
     2532      (let ((cbd (expand-file-name default-directory))) 
    25342533        (set-buffer speedbar-buffer) 
    25352534        (speedbar-with-writable 
     
    25432542            (speedbar-reconfigure-keymaps) 
    25442543            (set-window-point window p) 
    2545             (set-window-start window start))) 
    2546         )))) 
     2544            (set-window-start window start))))))) 
    25472545 
    25482546(defun speedbar-update-directory-contents () 
     
    26782676               (not (eq (frame-visible-p (speedbar-current-frame)) 'icon))) 
    26792677          (let ((af (selected-frame))) 
    2680             (save-window-excursion 
    26812678              (dframe-select-attached-frame speedbar-frame) 
    26822679              ;; make sure we at least choose a window to 
     
    27052702                             major-mode) 
    27062703                            (speedbar-message nil)))) 
    2707                   ;; Update all the contents if directories change! 
    2708                   (if (or (member major-mode speedbar-ignored-modes) 
    2709                           (eq af (speedbar-current-frame)) 
    2710                           (not (buffer-file-name))) 
    2711                       nil 
    2712                     (speedbar-update-localized-contents) 
    2713                     )) 
    2714                 (select-frame af))) 
     2704                    (speedbar-update-localized-contents)) 
     2705                (select-frame af)) 
    27152706            ;; Now run stealthy updates of time-consuming items 
    27162707            (speedbar-stealthy-updates)))))