Mercurial > hg > xemacs-beta
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 |