.emacs-my
changeset 1533 bf21c20118b4
parent 1532 e6ea63ccab39
child 1534 a20f8f4abec7
equal deleted inserted replaced
1532:e6ea63ccab39 1533:bf21c20118b4
  1434 
  1434 
  1435 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  1435 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  1436 (message "logging, logs")
  1436 (message "logging, logs")
  1437 
  1437 
  1438 (defun my-auto-revert-tail-mode-hook ()
  1438 (defun my-auto-revert-tail-mode-hook ()
  1439   (when (string-match "/logs?/\\|\\.\\(?:log\\|out\\)\\'\\|/.xsession-errors\\'"
  1439   (when (string-match "/logs?/\\|\\.\\(?:log\\|out\\|log\\.[0-9]\\)\\'\\|/.xsession-errors\\'"
  1440                       (buffer-file-name (current-buffer)))
  1440                       (buffer-file-name (current-buffer)))
       
  1441     (fundamental-mode)
  1441     (auto-revert-tail-mode 1)
  1442     (auto-revert-tail-mode 1)
  1442     (log4-hi-mode 1)
  1443     (log4-hi-mode 1)
  1443     (setq scroll-margin my-scroll-margin)
  1444     (setq scroll-margin my-scroll-margin)
  1444     ))
  1445     ))
  1445 (add-hook 'find-file-hook 'my-auto-revert-tail-mode-hook)
  1446 (add-hook 'find-file-hook 'my-auto-revert-tail-mode-hook)