Show
Ignore:
Timestamp:
2006年05月27日 10時35分24秒 (2 years ago)
Author:
miyoshi
Message:

Sync up with Emacs CVS HEAD.

Files:

Legend:

Unmodified
Added
Removed
Modified
Copied
Moved

  • trunk/lisp/international/mule.el

    r4085 r4091  
    9999        (let (kill-buffer-hook kill-buffer-query-functions) 
    100100          (kill-buffer buffer))) 
    101       (let ((hook (assoc file after-load-alist))) 
    102         (when hook 
    103           (mapcar (function eval) (cdr hook)))) 
     101      (unless purify-flag 
     102        (do-after-load-evaluation fullname)) 
     103       
    104104      (unless (or nomessage noninteractive) 
    105105        (if source 
    …… 
    19871987            (setq coding (car (find-operation-coding-system 
    19881988                               'insert-file-contents 
    1989                                filename visit beg end replace)))) 
     1989                               (cons filename (current-buffer)) 
     1990                               visit beg end replace)))) 
    19901991        (if (coding-system-p coding) 
    19911992            (or enable-multibyte-characters