diff options
| author | Craig Jennings <c@cjennings.net> | 2025-11-05 01:00:38 -0600 |
|---|---|---|
| committer | Craig Jennings <c@cjennings.net> | 2025-11-05 01:00:38 -0600 |
| commit | 312d7598385d6cd620e88852c9e47f74fc759c23 (patch) | |
| tree | aa5b8e8965960075231f9d36f8cff12a273f94d3 | |
| parent | e1eb6171c62821c295a76ba6bd3c280cc91a1e65 (diff) | |
| download | dotemacs-312d7598385d6cd620e88852c9e47f74fc759c23.tar.gz dotemacs-312d7598385d6cd620e88852c9e47f74fc759c23.zip | |
feat: Configure scratch buffer for org-mode with cursor at end
- Set initial-major-mode to org-mode for *scratch* buffer
- Add emacs-startup-hook to position cursor at end of buffer
- Update greeting message comment syntax from ;; to # for org-mode
- Re-enable debug flag reset on startup in early-init.el
This makes the scratch buffer immediately ready for org-mode note-taking
with cursor positioned for typing, eliminating manual mode switching and
cursor movement.
| -rw-r--r-- | docs/NOTES.org | 34 | ||||
| -rw-r--r-- | early-init.el | 8 | ||||
| -rw-r--r-- | modules/system-utils.el | 13 |
3 files changed, 49 insertions, 6 deletions
diff --git a/docs/NOTES.org b/docs/NOTES.org index a9913bfac..f04d03d07 100644 --- a/docs/NOTES.org +++ b/docs/NOTES.org @@ -515,6 +515,40 @@ If Craig or Claude need more context: ** 🚀 Current Session Notes +*** 2025-11-05 Session 2 - Scratch Buffer Configuration +*Time:* ~5 minutes +*Status:* ✅ COMPLETE - Scratch buffer opens in org-mode with cursor at end + +*Problem:* +- Scratch buffer opened in lisp-interaction-mode +- Cursor positioned at beginning of buffer +- Craig wanted org-mode with cursor ready to type at end + +*Solution:* +1. **Set scratch buffer to org-mode** - `(setopt initial-major-mode 'org-mode)` +2. **Move cursor to end on startup** - Added `emacs-startup-hook` to position cursor +3. **Updated comment syntax** - Changed `;;` to `#` in greeting messages for org-mode + +*Files Modified:* +- modules/system-utils.el:186-203 + - Added `initial-major-mode` configuration + - Added startup hook for cursor positioning + - Updated greeting message comment syntax for org-mode compatibility + +*Technical Details:* +- Used `emacs-startup-hook` to run after init completes +- Buffer name check ensures we only affect *scratch* buffer +- Greeting message now uses org-mode comment syntax (#) + +*Testing:* +- Configuration updated in modules/system-utils.el:197-203 +- Requires restart or eval-buffer to take effect + +*Next Steps:* +- Restart Emacs or evaluate modules/system-utils.el +- Verify scratch buffer opens in org-mode +- Verify cursor positioned at end of buffer + *** 2025-11-05 Session 1 - Fix Google Calendar Password Prompts *Time:* ~15 minutes *Status:* ✅ COMPLETE - Fixed irritating password prompts every 10 minutes diff --git a/early-init.el b/early-init.el index 6fa3e0b2a..c1cd54c8b 100644 --- a/early-init.el +++ b/early-init.el @@ -51,10 +51,10 @@ (setq debug-on-error t) ;; default nil. turn on to debug issues only. (setq debug-on-quit t) ;; debug on C-g (breaking out of hangs/freezes) -;; (add-hook 'emacs-startup-hook -;; (lambda () -;; (setq debug-on-error nil) -;; (setq debug-on-quit nil))) +(add-hook 'emacs-startup-hook + (lambda () + (setq debug-on-error nil) + (setq debug-on-quit nil))) ;; ------------------------------ Bug Workarounds ------------------------------ diff --git a/modules/system-utils.el b/modules/system-utils.el index 2b39d8625..e96867771 100644 --- a/modules/system-utils.el +++ b/modules/system-utils.el @@ -186,13 +186,22 @@ Logs output and exit code to buffer *external-open.log*." ;;; -------------------------- Scratch Buffer Happiness ------------------------- (defvar scratch-emacs-version-and-system - (concat ";; Emacs " emacs-version + (concat "# Emacs " emacs-version " on " system-configuration ".\n")) (defvar scratch-greet - (concat ";; Emacs ♥ you, " user-login-name ". Happy Hacking!\n\n")) + (concat "# Emacs ♥ you, " user-login-name ". Happy Hacking!\n\n")) (setopt initial-scratch-message (concat scratch-emacs-version-and-system scratch-greet)) +;; Set scratch buffer to org-mode +(setopt initial-major-mode 'org-mode) + +;; Move cursor to end of scratch buffer on startup +(add-hook 'emacs-startup-hook + (lambda () + (when (string= (buffer-name) "*scratch*") + (goto-char (point-max))))) + ;;; --------------------------------- Dictionary -------------------------------- (use-package quick-sdcv |
