bug#1907: 23.0.60; bibtex failed on this bib entry

[Chong Yidong]

Hi Roland, could you take a look at this bug report?

Thanks.


Leo <sdl.web@gmail.com> wrote:

> In BibTeX-mode run C-c C-c on this entry to get the backtrace.
>
> @misc{dingle1976qeh,
>   title={{Quantum effects in heterostructure lasers}},
>   author={Dingle, R. and Henry, C.H.},
>   year={1976},
>   month=sep # "~21",
>   publisher={Google Patents},
>   note={US Patent 3,982,207}
> }
>
> The bib entry can also be obtained from the following link
> http://scholar.google.com/scholar.bib?hl=en&lr=&newwindow=1&output=search&q=info:O42N6xYt09QJ:scholar.google.com/&output=citation&oe=ASCII&oi=citation
>
> Backtrace:
>
> Debugger entered--Lisp error: (scan-error "Unbalanced parentheses" 143
> 210)
>   scan-sexps(143 1)
>   forward-sexp(1)
>   bibtex-parse-field-string()
>   bibtex-parse-field-text()
>   bibtex-parse-association(bibtex-parse-field-name
>   bibtex-parse-field-text)
>   bibtex-parse-field()
>   bibtex-valid-entry(t)
>   bibtex-end-of-entry()
>   bibtex-fill-entry()
>   bibtex-format-entry()
>   (cond ((bibtex-string= entry-type "preamble") (error "No clean up of
>   @Preamble entries")) ((bibtex-string= entry-type "string") (setq
>   entry-type ...)) (t (bibtex-format-entry)))
>   (let ((case-fold-search t) (start ...) (_ ...) (entry-type ...) (key
>   ...)) (cond (... ...) (... ...) (t ...)) (when (or new-key ...) (setq
>   key ...) (if ... ...) (save-excursion ... ... ...)) (unless
>   called-by-reformat (let* ... ... ... ... ...) (if
>   bibtex-clean-entry-hook ...)))
>   bibtex-clean-entry(nil)
>   call-interactively(bibtex-clean-entry nil nil)