.emacs-my
changeset 1334 6e334301afb1
parent 1333 9927012ea835
child 1335 c8606339804e
equal deleted inserted replaced
1333:9927012ea835 1334:6e334301afb1
    25 ;; Prevent TRAMP to login on remote host when loading. Its take time and ask passwords!
    25 ;; Prevent TRAMP to login on remote host when loading. Its take time and ask passwords!
    26 (setq recentf-keep '(file-remote-p file-readable-p))
    26 (setq recentf-keep '(file-remote-p file-readable-p))
    27 (setq recentf-exclude                   ; Use ``M-x recentf-cleanup`` to update recentf-list.
    27 (setq recentf-exclude                   ; Use ``M-x recentf-cleanup`` to update recentf-list.
    28       '("/devel/[^/]*-\\(orig\\|tmp\\|xxx\\)"
    28       '("/devel/[^/]*-\\(orig\\|tmp\\|xxx\\)"
    29         "/devel/my-\\(merge\\|pull\\)/"
    29         "/devel/my-\\(merge\\|pull\\)/"
       
    30         "/.cache/"
    30         "\\.png\\'"))
    31         "\\.png\\'"))
    31 
    32 
    32 (setq recentf-max-saved-items 10000)
    33 (setq recentf-max-saved-items 10000)
    33 (setq recentf-max-menu-items 40)
    34 (setq recentf-max-menu-items 40)
    34 (setq recentf-show-file-shortcuts-flag nil)
    35 (setq recentf-show-file-shortcuts-flag nil)
  1531   (require 'org))
  1532   (require 'org))
  1532 
  1533 
  1533 ;; XXX org-todo-keywords '((sequence "TODO" "START" "|" "DONE")) for org-version 4.67c
  1534 ;; XXX org-todo-keywords '((sequence "TODO" "START" "|" "DONE")) for org-version 4.67c
  1534 (when (or (featurep 'org) (featurep 'org-install))
  1535 (when (or (featurep 'org) (featurep 'org-install))
  1535   (add-to-list 'auto-mode-alist '("\\.org$" . org-mode))
  1536   (add-to-list 'auto-mode-alist '("\\.org$" . org-mode))
  1536   (setq org-directory "~/devel/my/gtd")
  1537   (setq org-directory "~/my/gtd")
  1537   (setq
  1538   (setq
  1538    org-agenda-ndays 31
  1539    org-agenda-ndays 31
  1539    org-deadline-warning-days 7
  1540    org-deadline-warning-days 7
  1540    org-agenda-show-all-dates t
  1541    org-agenda-show-all-dates t
  1541    org-agenda-format-date "%Y-%m-%d, %A %e %B"
  1542    org-agenda-format-date "%Y-%m-%d, %A %e %B"