@@ -1394,7 +1394,11 @@ When enabled, some keybindings are available across all buffers."
13941394 ; ; This avoids overriding critical keybindings like M-x
13951395 (message (if enkan-repl-global-minor-mode
13961396 " ✅ global mode enabled"
1397- " ❌ global mode disabled" )))
1397+ " ❌ global mode disabled" ))
1398+ (enkan-repl--log 'info " %s"
1399+ (if enkan-repl-global-minor-mode
1400+ " ✅ global mode enabled"
1401+ " ❌ global mode disabled" )))
13981402
13991403;;;### autoload
14001404(defun enkan-repl-toggle-global-mode ()
@@ -1752,9 +1756,11 @@ Returns t on success, nil on failure."
17521756 (pcase status
17531757 ('no-buffers
17541758 (message (plist-get resolution :message ))
1759+ (enkan-repl--log 'info " %s" (plist-get resolution :message ))
17551760 nil )
17561761 ('invalid
17571762 (message (plist-get resolution :message ))
1763+ (enkan-repl--log 'info " %s" (plist-get resolution :message ))
17581764 nil )
17591765 ((or 'selected 'single )
17601766 (setq target-buffer (plist-get resolution :buffer )))
@@ -1880,15 +1886,18 @@ Category: Center File Multi-buffer Access"
18801886 pfx)))
18811887 (pcase (plist-get result :status )
18821888 ((or 'no-project 'no-paths 'no-buffers )
1883- (message (plist-get result :message )))
1889+ (message (plist-get result :message ))
1890+ (enkan-repl--log 'info " %s" (plist-get result :message )))
18841891 ('invalid
1885- (message " Directory does not exist: %s " (plist-get result :path )))
1892+ (message " Directory does not exist: %s " (plist-get result :path ))
1893+ (enkan-repl--log 'info " Directory does not exist: %s" (plist-get result :path )))
18861894 ((or 'single 'selected )
18871895 (let ((path (plist-get result :path )))
18881896 (when (and path (file-directory-p path))
18891897 (dired path))))
18901898 ('cancelled
1891- (message " Selection cancelled " )))))
1899+ (message " Selection cancelled " )
1900+ (enkan-repl--log 'info " Selection cancelled" )))))
18921901
18931902(defun enkan-repl--analyze-send-content (content pfx )
18941903 " Pure function to analyze CONTENT with PFX and determine action.
@@ -1991,6 +2000,7 @@ Category: Center File Operations"
19912000 (if (plist-get result :valid )
19922001 (progn
19932002 (message " %s " (plist-get result :message ))
2003+ (enkan-repl--log 'info " %s" (plist-get result :message ))
19942004 (find-file enkan-repl-center-file))
19952005 (error " %s " (plist-get result :message )))))
19962006
0 commit comments