comparison lisp/hm--html-menus/adapt.el @ 22:8fc7fe29b841 r19-15b94

Import from CVS: tag r19-15b94
author cvs
date Mon, 13 Aug 2007 08:50:29 +0200
parents ac2d302a0011
children 6a22abad6937
comparison
equal deleted inserted replaced
21:b88636d63495 22:8fc7fe29b841
1 ;;; $Id: adapt.el,v 1.1.1.2 1996/12/18 03:46:45 steve Exp $ 1 ;;; $Id: adapt.el,v 1.2 1997/02/16 01:29:07 steve Exp $
2 ;;; 2 ;;;
3 ;;; Copyright (C) 1993, 1994, 1995 Heiko Muenkel 3 ;;; Copyright (C) 1993, 1994, 1995 Heiko Muenkel
4 ;;; email: muenkel@tnt.uni-hannover.de 4 ;;; email: muenkel@tnt.uni-hannover.de
5 ;;; 5 ;;;
6 ;;; This program is free software; you can redistribute it and/or modify 6 ;;; This program is free software; you can redistribute it and/or modify
310 (setq minor-mode-map-alist 310 (setq minor-mode-map-alist
311 (cons (cons toggle keymap) 311 (cons (cons toggle keymap)
312 minor-mode-map-alist)))) 312 minor-mode-map-alist))))
313 )) 313 ))
314 ) 314 )
315
316 (if (not (fboundp 'redraw-modeline))
317 (defalias 'redraw-modeline 'force-mode-line-update))
318
315 )) 319 ))
316 320
317 321
318 (provide 'adapt) 322 (provide 'adapt)