describe-function error

[Nick Roberts]

Ch f ` RET gives

Wrong type argument: integer-or-marker-p, nil

The patch below fixes it.  It's not elegant, but it just seems to be an
isolated case.


-- 
Nick                                           http://www.inet.net.nz/~nickrob


*** find-func.el        13 Jul 2006 20:31:54 +1200      1.73
--- find-func.el        21 Jul 2006 00:35:28 +1200      
*************** The search is done in the source for lib
*** 226,232 ****
           (regexp-symbol (cdr (assq type find-function-regexp-alist))))
        (with-current-buffer (find-file-noselect filename)
        (let ((regexp (format (symbol-value regexp-symbol)
!                             (regexp-quote (symbol-name symbol))))
              (case-fold-search))
          (with-syntax-table emacs-lisp-mode-syntax-table
            (goto-char (point-min))
--- 226,234 ----
           (regexp-symbol (cdr (assq type find-function-regexp-alist))))
        (with-current-buffer (find-file-noselect filename)
        (let ((regexp (format (symbol-value regexp-symbol)
!                             ;; Catch ` (backquote) macro.
!                             (concat "\\\\?"
!                                     (regexp-quote (symbol-name symbol)))))
              (case-fold-search))
          (with-syntax-table emacs-lisp-mode-syntax-table
            (goto-char (point-min))