Re: Constant symbol :help error when loading igrep.el into July 7 CVS snapshot

[Kevin Rodgers]

Andrew M. Scott writes:
> 
> % emacs -q -no-site-file
> (setq debug-on-error t)
> (load-library "/stor/garray/ascott/gnu/share/emacs/site-lisp/igrep.el"), 
> where igrep.el is version 2.112 from http://emacswiki.org/elisp/igrep.el
> 
> I get the error:
> 
> Debugger entered--Lisp error: (error "Constant symbol `:help' specified in 
> defvar")
>   (defvar :help (quote :help))
>   eval-buffer(#<buffer  *load*> nil 
> "/stor/garray/ascott/gnu/share/emacs/site-lisp/igrep.el" nil t)
>   ;;; Reading at buffer position 13812
>   
> load-with-code-conversion("/stor/garray/ascott/gnu/share/emacs/site-lisp/igrep.el"
>  "/stor/garray/ascott/gnu/share/emacs/site-lisp/igrep.el" nil nil)
>   load("$Local/igrep.el")
>   load-library("$Local/igrep.el")
>   call-interactively(load-library)
>   execute-extended-command(nil)
>   call-interactively(execute-extended-command)

Does this patch solve the problem?

*** igrep.el.~2.112~    Wed Aug 25 16:00:23 2004
--- igrep.el    Mon Jul 11 11:02:07 2005
***************
*** 339,345 ****
        (vector name callback)
      (vector name callback help-keyword help-text)))
  
! (defvar :help ':help)                 ; Emacs 19
  
  (defvar igrep-easy-menu
    `("Search Files and Directories (igrep)"
--- 339,347 ----
        (vector name callback)
      (vector name callback help-keyword help-text)))
  
! (eval-when-compile
!   (unless (and (fboundp 'keywordp) (keywordp :help))
!     (defvar :help ':help)))             ; Emacs 19
  
  (defvar igrep-easy-menu
    `("Search Files and Directories (igrep)"

-- 
Kevin