Re: Caps-mode vs. Overwrite mode

[Stefan Monnier <monnier@iro.umontreal.ca>]

>> The caps-mode.el that's in GNU ELPA shouldn't suffer from this
>> problem, AFAIK.
> My first search only turns up caps-lock.el?

Ah, right, that's the one.  Sorry for the typo.

> Spoke too soon.
> caps-lock mode isn't buffer local.

Indeed.

You can make it buffer-local with the patch below.

If someone wants to submit a patch which adds buffer-local variant, that
could be included in the GNU ELPA package.


        Stefan


diff --git a/packages/caps-lock/caps-lock.el b/packages/caps-lock/caps-lock.el
index 24729a4..5787ef8 100644
--- a/packages/caps-lock/caps-lock.el
+++ b/packages/caps-lock/caps-lock.el
@@ -29,10 +29,10 @@
 ;;;###autoload
 (define-minor-mode caps-lock-mode
   "Make self-inserting keys invert the capitalization."
-  :global t
+  ;; :global t
   (if caps-lock-mode
-      (add-hook 'pre-command-hook #'caps-lock--pch)
-    (remove-hook 'pre-command-hook #'caps-lock--pch)))
+      (add-hook 'pre-command-hook #'caps-lock--pch nil t)
+    (remove-hook 'pre-command-hook #'caps-lock--pch t)))
 
 (defun caps-lock--pch ()
   (when (and (characterp last-command-event)