diff options
Diffstat (limited to 'config.org')
| -rw-r--r-- | config.org | 32 |
1 files changed, 16 insertions, 16 deletions
@@ -277,16 +277,16 @@ annotations. (global-corfu-mode 1)) #+end_src -* People rolodex +* People CRM -The people workflow is a lightweight rolodex backed by the canonical +The people workflow is a CRM backed by the canonical =~/org/areas/people/people.org= file. Each top-level heading is a compact card with properties for lookup, completion, reports, and abbrevs. Abbrev remains the fast path for names you type all the time, while CAPF plus Corfu remains the discovery path. The machine-facing layer only reads heading text and properties; the =Context= and =TODOs= sections stay human-facing notes. -The rolodex is designed around =ss/people-overview=: opening the file starts in +The CRM is designed around =ss/people-overview=: opening the file starts in overview mode, direct visits reset back to overview mode, and exiting card view means widening the buffer and restoring that overview. Keep =CURRENT_FOCUS= short and phrase-like so summaries and completion annotations stay readable. @@ -298,7 +298,7 @@ short and phrase-like so summaries and completion annotations stay readable. (defconst ss/people-file (expand-file-name "areas/people/people.org" "~/org/") - "Single source of truth for the lightweight people rolodex.") + "Single source of truth for the people CRM.") (defconst ss/people-engagement-values '("permanent" "contractor" "other") @@ -309,10 +309,10 @@ short and phrase-like so summaries and completion annotations stay readable. "Allowed relationship values for people cards.") (defvar ss/people--cache nil - "Cached rolodex entries loaded from `ss/people-file'.") + "Cached CRM entries loaded from `ss/people-file'.") (defvar ss/people--cache-mtime nil - "Modification time of the cached rolodex entries.") + "Modification time of the cached CRM entries.") (defun ss/people--entry-name (entry) "Return the canonical name in ENTRY." @@ -407,7 +407,7 @@ short and phrase-like so summaries and completion annotations stay readable. (with-temp-buffer (insert-file-contents file) ;; Parse cards without running user hooks; otherwise the - ;; rolodex's own Org hooks recurse back into this parser. + ;; CRM's own Org hooks recurse back into this parser. (delay-mode-hooks (org-mode)) (goto-char (point-min)) @@ -441,7 +441,7 @@ short and phrase-like so summaries and completion annotations stay readable. (setq ss/people--cache nil ss/people--cache-mtime nil) (ss/people-refresh-buffers) - (message "Reloaded people rolodex")) + (message "Reloaded people CRM")) (defun ss/people--entry-by-name (name) "Return the people entry matching canonical NAME." @@ -512,12 +512,12 @@ short and phrase-like so summaries and completion annotations stay readable. (org-cycle-hide-drawers 'all)) (defun ss/people-open () - "Open the people rolodex by delegating to `ss/people-overview'." + "Open the people CRM by delegating to `ss/people-overview'." (interactive) (ss/people-overview)) (defun ss/people--track-buffer () - "Refresh rolodex caches when `ss/people-file' is saved." + "Refresh CRM caches when `ss/people-file' is saved." (when (and buffer-file-name (string= (file-truename buffer-file-name) (file-truename ss/people-file))) @@ -530,7 +530,7 @@ short and phrase-like so summaries and completion annotations stay readable. (file-truename ss/people-file)))) (defun ss/people--open-entry (entry) - "Open the people rolodex file, then narrow to ENTRY for card view." + "Open the people CRM file, then narrow to ENTRY for card view." (find-file (ss/people--require-file)) (widen) (let ((position (org-find-exact-headline-in-buffer @@ -565,7 +565,7 @@ short and phrase-like so summaries and completion annotations stay readable. (insert (ss/people--display entry)))) (defun ss/people--report-buffer (title group-fn) - "Render a grouped rolodex report titled TITLE using GROUP-FN." + "Render a grouped CRM report titled TITLE using GROUP-FN." (let ((groups (sort (seq-group-by (lambda (entry) @@ -741,7 +741,7 @@ short and phrase-like so summaries and completion annotations stay readable. (add-hook 'completion-at-point-functions #'ss/people-capf nil t))) (defun ss/people--maybe-overview-buffer () - "Reset the people rolodex buffer to overview when visiting it directly." + "Reset the people CRM buffer to overview when visiting it directly." (when (and buffer-file-name (string= (file-truename buffer-file-name) (file-truename ss/people-file))) @@ -1015,9 +1015,9 @@ per-day =Tasks=, =Notes=, and =Meetings= headings. Denote capture uses Denote's own Org integration so note identity, metadata, and directories stay under Denote's control rather than custom code. The convenience templates keep the familiar entry points, but only project capture injects a structural keyword by -default. The people rolodex lives outside =org-capture=: adding a person uses -the dedicated =ss/people-add= command so =~/org/areas/people/people.org= stays a compact, -structured card file rather than turning into another capture target. +default. The people CRM lives outside =org-capture=: adding a person uses the +dedicated =ss/people-add= command so =~/org/areas/people/people.org= stays a +compact, structured card file rather than turning into another capture target. #+begin_src emacs-lisp (use-package org-capture |