Re: [drew.adams@oracle.com: RE: weird defadvice bug withbyte-compilation]

["Richard M. Stallman" <rms@gnu.org>]

    See my previous message - I already indicated that the menu-enable is
    testing a void variable. The question is why it is void.

It is void because there is nothing in the code to set it.
Why do you think it would NOT be void?

    There are a couple of questions involved (see my email), including how
    define-minor-mode works.

What does this have to do with define-minor-mode?
Your code does not use define-minor-mode.

    File 1: foo.el
    --------------

    (defvar mymap nil "")

    (let ((map (make-sparse-keymap "II")))
      (setq mymap (make-sparse-keymap))
      (define-key menu-bar-search-menu [ise]  '("" . ise))
      (put 'ise 'menu-enable '(and my-mode))
      (push (cons 'my-mode mymap) minor-mode-map-alist))

    (defadvice next-history-element (after ffff activate) "" my-mode)

    (provide 'foo)

    File 2: bar.el
    --------------

    (defconst special-display-regexps '("[ ]?[*][^*]+[*]"))

    (defvar drews-lisp-dir "C:\\drews-lisp-20" "")
    (setq load-path (append (list drews-lisp-dir) load-path))


    (defadvice occur-mode-goto-occurrence
      (around jjjjjj activate compile)
      ""
      ad-do-it)

    (require 'foo)