load more.

init.el

@@ -93,5 +93,43 @@
 (load! "init-yasnip")
 (load! "init-dev")
 
+(load! "init-org")
+(load! "init-org-todo-state-tags")
+(load! "init-org-agenda")
+(load! "init-org-tags")
+(load! "init-org-capture")
+(load! "init-org-ob")
+(load! "init-org-diary")
+(load! "init-calender")
+(load! "init-weather-metno")
+(load! "init-org-export")
+(load! "init-org-misc")
+
+;;; info,  help, doc, man(woman) etc..
+(load! "init-info")
+(load! "init-eldoc")
+(load! "init-help")
+
+(load! "init-web")
+
+;;; sys & server  shell, term, tramp
+(load! "init-sys")
+(load! "init-print")
+(load! "init-crontab")
+(load! "init-time")
+(load! "init-term")
+(load! "init-tramp")
+
+
+;;; Emacs server
+(load! "init-server")
+(load! "init-session")
+
+;;;  misc
+(load! "init-misc")
+(load! "init-utils")
+(load! "init-boxquote")
+
+
 (load! "init-finish")
 ;; init ends here

lisp/init-boxquote.el

@@ -1,7 +1,7 @@
 ;;; init-boxquote.el
 ;; Created: 水曜日, 1月  2 2013
 
-(el-get 'sync 'boxquote)
+(ensure-package-installed 'boxquote)
 
 (setq boxquote-top-and-tail "─────"
       boxquote-top-corner "╭"

lisp/init-finish.el

@@ -7,7 +7,7 @@
 (add-hook 'emacs-startup-hook
           '(lambda ()
              (progn
-               (message ".emacs loaded in %s; %s"
-                        (emacs-init-time) "As always by your command... "))))
+               (message "Startup took %s; %s"
+                        (emacs-init-time) "As always by your command..."))))
 
 ;;; init-finish.el ends here

lisp/init-help.el

@@ -3,16 +3,23 @@
 ;; Created: Friday, September 16 2011
 
 ;; Emacs help related settings
+(ensure-package-installed 'guide-key)
 
 ;;; help-map additional keys
 ;;; jump to source of `key`
-(define-key help-map (kbd "C-k") 'find-function-on-key)
-(define-key help-map (kbd "C-f") 'find-function-at-point)
-(define-key help-map (kbd "C-v") 'find-variable-at-point)
+(eval-after-load "help"
+  `(progn
+     (define-key help-map (kbd "C-k") 'find-function-on-key)
+     (define-key help-map (kbd "C-f") 'find-function-at-point)
+     (define-key help-map (kbd "C-v") 'find-variable-at-point)))
 
 ;;; help-mode buffer
-(define-key help-mode-map (kbd "n") 'next-line)
-(define-key help-mode-map (kbd "p") 'previous-line)
+(eval-after-load "help-mode"
+  `(progn
+     (define-key help-mode-map (kbd "n") 'next-line)
+     (define-key help-mode-map (kbd "p") 'previous-line)
+     (define-key help-mode-map (kbd "M-<left>") 'help-go-back)
+     (define-key help-mode-map (kbd "M-<right>") 'help-go-forward)))
 
 ;;; http://www.masteringemacs.org/articles/2011/08/04/full-text-searching-info-mode-apropos/
 ;; Custom 'apropos' key bindings
@@ -29,10 +36,7 @@
 (define-key Apropos-Prefix (kbd "C-v") 'apropos-value)
 (define-key Apropos-Prefix (kbd "C-a")   'about-emacs)
 
-(define-key help-mode-map (kbd "M-<left>") 'help-go-back)
-(define-key help-mode-map (kbd "M-<right>") 'help-go-forward)
-
-(el-get 'sync 'guide-key)
+;;; guide-key
 (setq guide-key/guide-key-sequence '("C-x r" "C-x 4"))
 (guide-key-mode 1)
 (setq guide-key/guide-key-sequence t)

lisp/init-misc.el

@@ -1,9 +1,6 @@
 ;;; init-misc.el
 ;; Author: Yagnesh Raghava Yakkala. http://yagnesh.org
 
-;; (el-get 'sync 'wc-mode)
-;; (add-to-list 'org-mode-hook 'wc-mode)
-
 ;;----------------------------------------------------------------------------
 ;; Misc config - yet to be placed in separate files
 ;;----------------------------------------------------------------------------

lisp/init-org-diary.el

@@ -2,7 +2,7 @@
 ;; Yagnesh Raghava Yakkala. http://yagnesh.org
 ;; Created: Friday, June 17 2011
 
-(el-get 'sync 'japanese-holidays)
+(ensure-package-installed 'japanese-holidays)
 
 (setq org-agenda-include-diary nil)
 (setq org-agenda-diary-file "~/git/org/life/diary.org")
@@ -41,12 +41,13 @@
   `(progn
      (define-key calendar-mode-map "f" 'calendar-forward-day)
      (define-key calendar-mode-map "b" 'calendar-backward-day)
-     (require 'japanese-holidays)
+;     (require 'japanese-holidays)
      (setq diary-number-of-entries 31)
      (setq calendar-weekend-marker 'diary)
      (setq mark-holidays-in-calendar t)
      (setq calendar-holidays
-           (append japanese-holidays holiday-local-holidays holiday-other-holidays))))
+;           (append japanese-holidays holiday-local-holidays holiday-other-holidays)
+           (append holiday-local-holidays holiday-other-holidays))))
 
 ;; (add-hook 'today-visible-calendar-hook 'calendar-mark-weekend)
 ;; (add-hook 'today-invisible-calendar-hook 'calendar-mark-weekend)

lisp/init-org-misc.el

@@ -2,6 +2,8 @@
 ;; Author: Yagnesh Raghava Yakkala. http://yagnesh.org
 ;; Created: Tuesday, May 17 2011
 
+(ensure-package-installed 'org-tree-slide)
+
 ;;; org-scratch
 (defun dan/switch-to-org-scratch ()
   "Switch to a temp Org buffer.
@@ -38,7 +40,6 @@ If the region is active, insert it."
         ("A" . (org-agenda nil "T" t))
         ("$" . org-archive-subtree)))
 
-(el-get-bundle 'org-tree-slide)
 (eval-after-load "org-tree-slide"
   `(progn
      (define-key org-tree-slide-mode-map (kbd "<left>")

lisp/init-org.el

@@ -1,8 +1,6 @@
 ;;; init-org.el --
 ;; Copyright (C) Yagnesh Raghava Yakkala. http://yagnesh.org
 
-;; (el-get 'sync 'org-mode)
-
 ;;; load org
 (add-to-list 'auto-mode-alist
              '("\\.\\(org_archive\\)$" . org-mode))

lisp/init-battery.el → lisp/init-sys.el

@@ -1,6 +1,9 @@
-;;; init-battery.el
+;;; init-sys.el
 ;; Author: Yagnesh Raghava Yakkala. http://yagnesh.org
 
+;;; top-mode missing?
+(ensure-package-installed '(wgrep symon))
+
 ;;; http://stackoverflow.com/questions/5562974/emacs-is-it-running-on-laptop-or-on-desktop
 ;; (require 'battery)
 ;; (when (and battery-status-function
@@ -13,4 +16,5 @@
 
 (add-hook 'emacs-startup-hook
           '(lambda nil (display-battery-mode 1)))
-;;; init-battery.el ends here
+
+;;; init-sys.el ends here

lisp/init-utils.el

@@ -321,5 +321,4 @@ License: GPL v3 or later
       (execute-kbd-macro inp)
       (write-file out-file-name))))
 
-
 ;;; init-utils-el ends here

lisp/init-weather-metno.el

@@ -1,4 +1,5 @@
-(el-get 'sync 'weather-metno)
+(ensure-package-installed 'weather-metno)
+
 (setq weather-metno-get-image-props
       '(:width 8 :height 8 :ascent center))
 

lisp/init-web.el

@@ -1,9 +1,10 @@
 ;;; init-web.el
 
+(ensure-package-installed 'tinkerer)
+
 (after 'webjump
   (setq webjump-sites
-        (append '(("yorg" . "yagnesh.org")
-                  ("sap" . "sapporoindians.net"))
+        (append '(("yorg" . "yagnesh.org"))
                 webjump-sample-sites)))
 
 (global-set-key "\C-cj" 'webjump)
@@ -13,7 +14,6 @@
 ;; (el-get 'sync 'sx)
 
 ;;; Tinkerer
-(el-get 'sync 'tinkerer)
 (setq tinkerer-root-path "~/git/yorg/")
 
 ;;; init-web.el ends here