BUG REPORT: `eval-and-compile'

BUG REPORT: `eval-and-compile'

[Le Wang]

Hi,

Unless I'm missing something really obvious...

This code:

(defvar le::no-backup-or-vc-regexp
  "regexp matching backup and vc files."
  (eval-and-compile
    (concat "\\(^\\|/\\)"               ; go to beginning of 'basename'
            "\\("
            "CVS\\|RCS\\|SCCS\\|"       ; version control stuff
            "\\.\\{1,2\\}\\|"           ; dot directories
            "\\.?#.*?#\\|"              ; backups/auto-saves
            ".*~\\|"
            "\\)"
            "/?$")))

when evaluated, gives:

,----[ C-h v le::no-backup-or-vc-regexp RET ]
| le::no-backup-or-vc-regexp's value is 
| "regexp matching backup and vc files."
| 
| \(^\|/\)\(CVS\|RCS\|SCCS\|\.
| Uses keymap "1,2\", which is not currently defined.
| \|\.?#.*?#\|.*~\|\)/?$
| 
| [back]
`----

keymap?  That doesn't look right.

--
Le

Re: BUG REPORT: `eval-and-compile'

[Le Wang]

Le Wang wrote:

> Unless I'm missing something really obvious...

D'oh.  I am.  I swaped the initial value and docstring.

Sorry.

--
Le