feat(google-keep): load machine-local settings from google-keep.local.elHEADmain

The bridge's interpreter path and account email are machine-local, and
this config discards customize output, so nothing persisted them across
daemon restarts. The module now loads google-keep.local.el when readable
(the calendar-sync.local.el shape) before the interpreter check, so a
locally-set venv path is what gets verified. A broken local file reports
instead of breaking module load. Three tests cover load, absence, and
the error path.

3 files changed, 78 insertions, 0 deletions

diff --git a/.gitignore b/.gitignore
index b92678f9..bd3d9850 100644
--- a/.gitignore
+++ b/.gitignore
@@ -55,6 +55,7 @@ auto-save-list/
 /browser-choice.el
 /calendar-sync.local.el
 /signal-config.local.el
+/google-keep.local.el
 /client_secret_491339091045-sjje1r54s22vn2ugh45khndjafp89vto.apps.googleusercontent.com.json
 
 # reveal.js local clone (managed by scripts/setup-reveal.sh)
diff --git a/modules/google-keep-config.el b/modules/google-keep-config.el
index 1738fa6e..c0a5374f 100644
--- a/modules/google-keep-config.el
+++ b/modules/google-keep-config.el
@@ -46,6 +46,27 @@ Unset until the one-time setup is done; `cj/keep-refresh' warns when nil."
   :type 'string
   :group 'cj/keep)
 
+(defcustom cj/keep-local-config-file
+  (expand-file-name "google-keep.local.el" user-emacs-directory)
+  "Machine-local Keep config loaded when readable.
+The intended place for `cj/keep-python' (a machine-local venv path) and
+`cj/keep-email' -- gitignored, same shape as calendar-sync.local.el."
+  :type 'file
+  :group 'cj/keep)
+
+(defun cj/keep--load-local-config ()
+  "Load the machine-local Keep config when available.
+Return non-nil when the file loaded cleanly, nil when it is absent or
+broken; a broken file is reported via `message', never signaled."
+  (when (file-readable-p cj/keep-local-config-file)
+    (condition-case err
+        (load cj/keep-local-config-file nil t)
+      (error
+       (message "google-keep: Failed to load local config %s: %s"
+                (abbreviate-file-name cj/keep-local-config-file)
+                (error-message-string err))
+       nil))))
+
 (defvar cj/keep--bridge-script
   (expand-file-name "scripts/google-keep/keep-bridge.py" user-emacs-directory)
   "Path to the gkeepapi bridge script.")
@@ -202,6 +223,10 @@ Returns the note count."
 
 (keymap-global-set "C-c k" cj/keep-prefix-map)
 
+;; Machine-local settings (venv interpreter, email) load before the
+;; interpreter warning below, so a venv path set locally is what gets checked.
+(cj/keep--load-local-config)
+
 ;; Warn at load if the interpreter is missing; gkeepapi/token failures surface
 ;; at refresh time via the bridge's stderr reason token.
 (cj/executable-find-or-warn cj/keep-python "Google Keep bridge" 'google-keep-config)
diff --git a/tests/test-google-keep-config--local-config.el b/tests/test-google-keep-config--local-config.el
new file mode 100644
index 00000000..18769c5a
--- /dev/null
+++ b/tests/test-google-keep-config--local-config.el
@@ -0,0 +1,52 @@
+;;; test-google-keep-config--local-config.el --- Tests for the Keep machine-local config loader -*- lexical-binding: t; -*-
+
+;;; Commentary:
+;; Tests for cj/keep--load-local-config, the loader for the gitignored
+;; machine-local google-keep.local.el (venv interpreter path, account email) —
+;; the same shape calendar-sync uses for calendar-sync.local.el.
+
+;;; Code:
+
+(require 'ert)
+(require 'google-keep-config)
+
+(ert-deftest test-google-keep-local-config-loads-readable-file ()
+  "Normal: a readable local config file is loaded and its settings apply."
+  (let ((file (make-temp-file "keep-local-" nil ".el")))
+    (unwind-protect
+        (progn
+          (with-temp-file file
+            (insert "(setq test-google-keep--local-marker 'loaded)"))
+          (defvar test-google-keep--local-marker nil)
+          (setq test-google-keep--local-marker nil)
+          (let ((cj/keep-local-config-file file))
+            (should (cj/keep--load-local-config))
+            (should (eq test-google-keep--local-marker 'loaded))))
+      (delete-file file))))
+
+(ert-deftest test-google-keep-local-config-missing-file-is-quiet ()
+  "Boundary: an absent local config file is a silent no-op, no error."
+  (let ((cj/keep-local-config-file "/nonexistent/google-keep.local.el"))
+    (should-not (cj/keep--load-local-config))))
+
+(ert-deftest test-google-keep-local-config-broken-file-does-not-signal ()
+  "Error: a local config file with a broken form is caught and reported,
+never propagated as a load-time error."
+  (let ((file (make-temp-file "keep-local-broken-" nil ".el"))
+        (messages nil))
+    (unwind-protect
+        (progn
+          (with-temp-file file
+            (insert "(error \"deliberately broken local config\")"))
+          (let ((cj/keep-local-config-file file))
+            (cl-letf (((symbol-function 'message)
+                       (lambda (fmt &rest args)
+                         (push (apply #'format fmt args) messages)
+                         nil)))
+              (should-not (cj/keep--load-local-config)))
+            (should (seq-find (lambda (m) (string-match-p "google-keep.*local config" m))
+                              messages))))
+      (delete-file file))))
+
+(provide 'test-google-keep-config--local-config)
+;;; test-google-keep-config--local-config.el ends here