changeset 4442:cb81eadd0df5

(window-setup-hook): Add hook function.
author Richard M. Stallman <rms@gnu.org>
date Tue, 03 Aug 1993 17:45:17 +0000
parents 4d7048ac2a72
children 41c3094d0ed8
files lisp/paren.el
diffstat 1 files changed, 8 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/paren.el	Tue Aug 03 07:52:10 1993 +0000
+++ b/lisp/paren.el	Tue Aug 03 17:45:17 1993 +0000
@@ -125,7 +125,14 @@
     (progn
       (setq blink-paren-function nil)
       (add-hook 'post-command-hook 'show-paren-command-hook)))
-
+;;; This is in case paren.el is preloaded.
+(add-hook 'window-setup-hook
+	  (function (lambda ()
+		      (if window-system
+			  (progn
+			    (setq blink-paren-function nil)
+			    (add-hook 'post-command-hook
+				      'show-paren-command-hook))))))
 (provide 'paren)
 
 ;;; paren.el ends here