Malformed interactive spec in replace.el

[Juanma Barranquero]

In query-replace-regexp-eval:
replace.el:289:4:Warning: malformed interactive spec: (interactive
    (barf-if-buffer-read-only) (let* ((from (let
    ((query-replace-to-history-variable nil)) (query-replace-read-from "Query
    replace regexp" t))) (to (list (read-from-minibuffer (format "Query
    replace regexp %s with eval: " (query-replace-descr from)) nil nil t
    query-replace-to-history-variable from t)))) (replace-match-string-symbols
    to) (list from (car to) current-prefix-arg (if (and transient-mark-mode
    mark-active) (region-beginning)) (if (and transient-mark-mode mark-active)
    (region-end)))))
Wrote c:/bin/emacs/HEAD/lisp/replace.elc

                                                                Juanma