Re: form-at-point bug

[Richard Stallman]

         (read-from-whole-string "(x)")          ; from thingatpt.el
         => Lisp error: (error "Can't read whole string")

    It should return '(x)', not signal error.

This should fix it.  Does this make it work?

I think this is the right fix, because the optimization this turns off
should rarely have occasion to do anything useful.

*** bytecomp.el.~2.111.~        Thu Aug 29 13:26:47 2002
--- bytecomp.el Fri Sep  6 09:39:52 2002
***************
*** 274,280 ****
                 (const :tag "source-level" source)
                 (const :tag "byte-level" byte)))
  
! (defcustom byte-compile-delete-errors t
    "*If non-nil, the optimizer may delete forms that may signal an error.
  This includes variable references and calls to functions such as `car'."
    :group 'bytecomp
--- 274,280 ----
                 (const :tag "source-level" source)
                 (const :tag "byte-level" byte)))
  
! (defcustom byte-compile-delete-errors nil
    "*If non-nil, the optimizer may delete forms that may signal an error.
  This includes variable references and calls to functions such as `car'."
    :group 'bytecomp