Re: eval-buffer with debug-on-error t

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

    I have debug-on-error set to t. When I do an eval-buffer and there is an 
    undefined function:

       (this-is-no-fun)

    I get the error "Wrong type argument: stringp, nul

Does this fix it?  (I installed a more elaborate patch.)

*** debug.el	05 Jul 2005 00:45:47 -0400	1.90
--- debug.el	09 Jul 2005 00:05:50 -0400	
***************
*** 315,322 ****
      (while (re-search-forward "^  eval-buffer(" nil t)
        (end-of-line)
        (insert (format "\n  ;;; Reading at buffer position %d"
! 		      (with-current-buffer (nth 2 (backtrace-frame (debugger-frame-number)))
! 			(point))))))
    (debugger-make-xrefs))
  
  (defun debugger-make-xrefs (&optional buffer)
--- 315,325 ----
      (while (re-search-forward "^  eval-buffer(" nil t)
        (end-of-line)
        (insert (format "\n  ;;; Reading at buffer position %d"
! 		      (with-current-buffer
! 			  (or (nth 2 (backtrace-frame (debugger-frame-number)))
! 			      debugger-old-buffer)
! 			(point))))
!       ))
    (debugger-make-xrefs))
  
  (defun debugger-make-xrefs (&optional buffer)