Mercurial > hg > xemacs-beta
comparison lisp/autoload.el @ 460:223736d75acb r21-2-45
Import from CVS: tag r21-2-45
author | cvs |
---|---|
date | Mon, 13 Aug 2007 11:43:24 +0200 |
parents | abe6d1db359e |
children | ef4d2466a29c |
comparison
equal
deleted
inserted
replaced
459:9d4fd877b885 | 460:223736d75acb |
---|---|
165 (unwind-protect | 165 (unwind-protect |
166 (progn | 166 (progn |
167 (let ((find-file-hooks nil) | 167 (let ((find-file-hooks nil) |
168 (enable-local-variables nil)) | 168 (enable-local-variables nil)) |
169 (set-buffer (or visited (find-file-noselect file))) | 169 (set-buffer (or visited (find-file-noselect file))) |
170 (set-syntax-table lisp-mode-syntax-table)) | 170 (set-syntax-table emacs-lisp-mode-syntax-table)) |
171 (save-excursion | 171 (save-excursion |
172 (save-restriction | 172 (save-restriction |
173 (widen) | 173 (widen) |
174 (goto-char (point-min)) | 174 (goto-char (point-min)) |
175 (unless (search-forward generate-autoload-cookie nil t) | 175 (unless (search-forward generate-autoload-cookie nil t) |