diff options
| author | Stefan Kangas <stefan@marxist.se> | 2022-07-30 11:52:05 +0200 |
|---|---|---|
| committer | Stefan Kangas <stefan@marxist.se> | 2022-07-30 12:07:49 +0200 |
| commit | f08f5b7afe5da475ebbce700116375757c37521e (patch) | |
| tree | d8ca5a6f777c751110772635523667c3db7a8130 /lisp/textmodes/refbib.el | |
| parent | 2e21074efd01ad4cd79c70be2f45896af8bc2cdf (diff) | |
| download | emacs-f08f5b7afe5da475ebbce700116375757c37521e.tar.gz | |
Avoid leaving temp buffers in bib-mode and refbib
* lisp/textmodes/bib-mode.el (bib-capitalize-title):
* lisp/textmodes/refbib.el (r2b-capitalize-title): Use
with-temp-buffer.
Diffstat (limited to 'lisp/textmodes/refbib.el')
| -rw-r--r-- | lisp/textmodes/refbib.el | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/lisp/textmodes/refbib.el b/lisp/textmodes/refbib.el index ba1deca47dc..f697fcaf403 100644 --- a/lisp/textmodes/refbib.el +++ b/lisp/textmodes/refbib.el @@ -163,12 +163,12 @@ This is in addition to the `r2b-capitalize-title-stop-words'.") (defun r2b-capitalize-title (s) - "Like `capitalize', but don't capitalize stop words, except the first." - (with-current-buffer (get-buffer-create "$$$Scratch$$$") - (erase-buffer) - (insert s) - (r2b-capitalize-title-region (point-min) (point-max)) - (buffer-string))) + "Like `capitalize', but don't capitalize stop words, except the first." + (with-temp-buffer + (erase-buffer) + (insert s) + (r2b-capitalize-title-region (point-min) (point-max)) + (buffer-string))) ;********************************************************* (defun r2b-reset () |