User: viteno Date: 06/03/07 08:10:34 Modified: packages/xemacs-packages/edit-utils ChangeLog fast-lock.el Log: "m37j77wjq6.fsf_-nf--_xmat_-m:nwsgrp_---"＠tuxie.homelinux.net on xemacs-beta. Revision Changes Path 1.219 +5 -0 XEmacs/packages/xemacs-packages/edit-utils/ChangeLog Index: ChangeLog =================================================================== RCS file: /pack/xemacscvs/XEmacs/packages/xemacs-packages/edit-utils/ChangeLog,v retrieving revision 1.218 retrieving revision 1.219 diff -u -p -r1.218 -r1.219 --- ChangeLog 2006/02/22 12:53:53 1.218 +++ ChangeLog 2006/03/07 07:10:32 1.219 ＠＠ -1,3 +1,8 ＠＠ +2006-03-07 Nelson Ferreira <nelson.ferreira(a)ieee.org&gt; + + * fast-lock.el (fast-lock-after-fontify-buffer): Check existence + of fast-lock cache file before trying to access it. + 2006-02-22 Norbert Koch <viteno(a)xemacs.org&gt; * Makefile (VERSION): XEmacs package 2.33 released. 1.4 +1 -1 XEmacs/packages/xemacs-packages/edit-utils/fast-lock.el Index: fast-lock.el =================================================================== RCS file: /pack/xemacscvs/XEmacs/packages/xemacs-packages/edit-utils/fast-lock.el,v retrieving revision 1.3 retrieving revision 1.4 diff -u -p -r1.3 -r1.4 --- fast-lock.el 2000/04/07 08:47:40 1.3 +++ fast-lock.el 2006/03/07 07:10:32 1.4 ＠＠ -449,7 +449,7 ＠＠ See `fast-lock-mode'." (defun fast-lock-after-fontify-buffer () ;; Delete the Font Lock cache file used to restore fontification, if any. - (when fast-lock-cache-filename + (when (and fast-lock-cache-filename (file-exists-p fast-lock-cache-filename)) (if (file-writable-p fast-lock-cache-filename) (delete-file fast-lock-cache-filename) (message "File %s font lock cache cannot be deleted" (buffer-name))))