Move lang/org => org/*

Since lang/org has grown (and is expected to grow much, much more), it
has been given its own module category.

Concerns #129, #138

modules/org/org-notebook/autoload.el

@@ -0,0 +1,36 @@
+;;; org/org-notebook/autoload.el -*- lexical-binding: t; -*-
+
+(defun +org-notebook--explore-notes (dir)
+  (unless (file-directory-p dir)
+    (error "Directory doesn't exist: %s" dir))
+  (if (fboundp '+evil/neotree)
+      (neotree-dir dir)
+    (let ((default-directory dir))
+      (call-interactively (command-remapping 'find-file)))))
+
+;;;###autoload
+(defun +org-notebook/find-major-mode-notes ()
+  "Browse org notes in `+org-notebook-code-dir' in neotree, ido, ivy or helm --
+whichever is available."
+  (interactive)
+  (let ((dir (expand-file-name
+              (concat (or (cdr (assq major-mode +org-notebook-code-alist))
+                          (replace-regexp-in-string
+                           "+" "p"
+                           (string-remove-suffix "-mode" (symbol-name major-mode))
+                           nil t))
+                      "/")
+              +org-notebook-code-dir)))
+    (unless (file-in-directory-p dir +org-notebook-code-dir)
+      (error "Invalid location for %s notes: %s"
+             major-mode (abbreviate-file-name dir)))
+    (unless (file-directory-p dir)
+      (make-directory dir t))
+    (+org-notebook--explore-notes dir)))
+
+;;;###autoload
+(defun +org-notebook/find-project-notes ()
+  "Browse org notes in `+org-notebook-project-dir' in neotree, ido, ivy or helm --
+whichever is available."
+  (interactive)
+  (+org-notebook--explore-notes +org-notebook-project-dir))

modules/org/org-notebook/config.el

@@ -0,0 +1,27 @@
+;;; org/org-notebook/config.el -*- lexical-binding: t; -*-
+
+;; (add-hook 'org-load-hook '+org|init-notebook t)
+
+;; While I program, write or plan, I want easy access to notes of various kinds,
+;; such as major-mode/language specific notes, or project-specific notes. They
+;; can be accessed via `+org-notebook/find-major-mode-notes' and
+;; `+org-notebook/find-project-notes'.
+
+(defvar +org-notebook-dir (concat +org-dir "notes/")
+  "The directory where the notes are kept.")
+
+(defvar +org-notebook-code-dir (concat +org-notebook-dir "code/")
+  "The directory where programming notes and snippets are kept.")
+
+(defvar +org-notebook-project-dir (concat +org-notebook-dir "projects/")
+  "The directory where project notes are kept.")
+
+
+(defvar +org-notebook-code-alist
+  '((js2-mode . "javascript"))
+  "An alist mapping certain modes (symbols) to their org notes directory name.
+If a mode isn't here, it's guessed by stripping out the -mode suffix and
+replacing '+' characters with 'p's.")
+
+
+;; (defun +org|init-notebook ())