Re: Defining minor mode with minor-mode condition

[Stefan Monnier]

> ;;;###autoload
> (define-minor-mode crucibulum-minor-mode
>   "Minor mode for assisting with superior & inferior typeface."
>   :init-value nil
>   :global nil
>   :lighter " Crucibulum"
>   
>   (if crucibulum-minor-mode
>       (progn
>         (enable-texcom-typeface)
>         (enable-ricci-notation))
>     (disable-texcom-typeface)
>     (disable-ricci-notation)))

[ Of course those `:foo nil` keyword arguments are redundant.  ]
I actually often find it convenient to unconditionally "disable" first:

    (define-minor-mode crucibulum-minor-mode
      "Minor mode for assisting with superior & inferior typeface."
      :lighter " Crucibulum"
      (disable-texcom-typeface)
      (disable-ricci-notation)
      (when crucibulum-minor-mode
        (enable-texcom-typeface)
        (enable-ricci-notation)))

the advantage is to avoid problems where, say, `enable-texcom-typeface`
is not idempotent, so if you call (crucibulum-minor-mode 1) several times
you might end up with multiple copies of the same thing added to a list.


        Stefan