mirror of
git://git.sv.gnu.org/emacs.git
synced 2026-01-30 20:32:00 -08:00
find-file-hooks -> find-file-hook.
This commit is contained in:
parent
486212810f
commit
a702ffbb99
2 changed files with 21 additions and 12 deletions
|
|
@ -1,3 +1,7 @@
|
|||
2005-03-24 Stefan Monnier <monnier@iro.umontreal.ca>
|
||||
|
||||
* autoinsert.el: find-file-hooks -> find-file-hook.
|
||||
|
||||
2005-03-24 Lute Kamstra <lute@gnu.org>
|
||||
|
||||
* generic.el (generic-font-lock-defaults): Make it obsolete.
|
||||
|
|
@ -20,6 +24,11 @@
|
|||
* emacs-lisp/lisp-mode.el (lisp-imenu-generic-expression):
|
||||
Recognize define-generic-mode.
|
||||
|
||||
2005-03-23 Stefan Monnier <monnier@iro.umontreal.ca>
|
||||
|
||||
* icomplete.el (icomplete-simple-completing-p): Don't turn on icomplete
|
||||
if there's no completion table.
|
||||
|
||||
2005-03-23 Miles Bader <miles@gnu.org>
|
||||
|
||||
* progmodes/gdb-ui.el (breakpoint-enabled, breakpoint-disabled):
|
||||
|
|
@ -27,8 +36,7 @@
|
|||
|
||||
2005-03-23 Lute Kamstra <lute@gnu.org>
|
||||
|
||||
* generic-x.el: Code cleanup: make arguments constant whenever
|
||||
possible.
|
||||
* generic-x.el: Code cleanup: make args constant whenever possible.
|
||||
(installshield-statement-keyword-list)
|
||||
(installshield-system-functions-list)
|
||||
(installshield-system-variables-list, installshield-types-list)
|
||||
|
|
@ -36,8 +44,8 @@
|
|||
|
||||
* generic.el (generic-make-keywords-list): Add autoload cookie.
|
||||
|
||||
* calendar/time-date.el: Add comment on time value formats. Don't
|
||||
require parse-time.
|
||||
* calendar/time-date.el: Add comment on time value formats.
|
||||
Don't require parse-time.
|
||||
(with-decoded-time-value): New macro.
|
||||
(encode-time-value): New function.
|
||||
(time-to-seconds, time-less-p, time-subtract, time-add): Use them.
|
||||
|
|
@ -56,8 +64,8 @@
|
|||
(recentf-include-p): More robust.
|
||||
(recentf-keep-p): New function.
|
||||
(recentf-remove-if-non-kept): Rename from
|
||||
`recentf-remove-if-non-readable'. Use `recentf-keep-p'. All
|
||||
callers updated.
|
||||
`recentf-remove-if-non-readable'. Use `recentf-keep-p'.
|
||||
All callers updated.
|
||||
(recentf-menu-items-for-commands): Fix help string.
|
||||
(recentf-track-closed-file): Update. Doc fix.
|
||||
(recentf-cleanup): Update. Count removed files. Doc fix.
|
||||
|
|
|
|||
|
|
@ -1,6 +1,7 @@
|
|||
;;; autoinsert.el --- automatic mode-dependent insertion of text into new files
|
||||
|
||||
;; Copyright (C) 1985, 86, 87, 94, 95, 98, 2000, 03 Free Software Foundation, Inc.
|
||||
;; Copyright (C) 1985, 1986, 1987, 1994, 1995, 1998, 2000, 2003, 2005
|
||||
;; Free Software Foundation, Inc.
|
||||
|
||||
;; Author: Charlie Martin <crm@cs.duke.edu>
|
||||
;; Adapted-By: Daniel Pfeiffer <occitan@esperanto.org>
|
||||
|
|
@ -33,7 +34,7 @@
|
|||
;; auto-mode-alist.
|
||||
;;
|
||||
;; To use:
|
||||
;; (add-hook 'find-file-hooks 'auto-insert)
|
||||
;; (add-hook 'find-file-hook 'auto-insert)
|
||||
;; setq auto-insert-directory to an appropriate slash-terminated value
|
||||
;;
|
||||
;; You can also customize the variable `auto-insert-mode' to load the
|
||||
|
|
@ -67,7 +68,7 @@ Insertion is possible when something appropriate is found in
|
|||
`auto-insert-alist'. When the insertion is marked as unmodified, you can
|
||||
save it with \\[write-file] RET.
|
||||
This variable is used when the function `auto-insert' is called, e.g.
|
||||
when you do (add-hook 'find-file-hooks 'auto-insert).
|
||||
when you do (add-hook 'find-file-hook 'auto-insert).
|
||||
With \\[auto-insert], this is always treated as if it were t."
|
||||
:type '(choice (const :tag "Insert if possible" t)
|
||||
(const :tag "Do nothing" nil)
|
||||
|
|
@ -326,10 +327,10 @@ When Auto-insert mode is enabled, when new files are created you can
|
|||
insert a template for the file depending on the mode of the buffer."
|
||||
:global t :group 'auto-insert
|
||||
(if auto-insert-mode
|
||||
(add-hook 'find-file-hooks 'auto-insert)
|
||||
(remove-hook 'find-file-hooks 'auto-insert)))
|
||||
(add-hook 'find-file-hook 'auto-insert)
|
||||
(remove-hook 'find-file-hook 'auto-insert)))
|
||||
|
||||
(provide 'autoinsert)
|
||||
|
||||
;;; arch-tag: 5b6630ac-c735-43cf-b097-b78c622af909
|
||||
;; arch-tag: 5b6630ac-c735-43cf-b097-b78c622af909
|
||||
;;; autoinsert.el ends here
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue