comparison lisp/energize/energize-init.el @ 70:131b0175ea99 r20-0b30

Import from CVS: tag r20-0b30
author cvs
date Mon, 13 Aug 2007 09:02:59 +0200
parents 376386a54a3c
children
comparison
equal deleted inserted replaced
69:804d1389bcd6 70:131b0175ea99
266 ) 266 )
267 (if (not (memq buffer buffers-to-avoid)) 267 (if (not (memq buffer buffers-to-avoid))
268 (progn 268 (progn
269 (message "Energizing buffer %s..." (buffer-name buffer)) 269 (message "Energizing buffer %s..." (buffer-name buffer))
270 (find-file-noselect filename)) 270 (find-file-noselect filename))
271 (message (format "Buffer %s not Energized." (buffer-name buffer))) 271 (message "Buffer %s not Energized." (buffer-name buffer))
272 (sit-for 1))))) 272 (sit-for 1)))))
273 (message nil))))) 273 (message nil)))))
274 274
275 (add-hook 'energize-connect-hook 'energize-all-buffers) 275 (add-hook 'energize-connect-hook 'energize-all-buffers)
276 276