diff options
author | David Aspinall <da@inf.ed.ac.uk> | 2010-07-08 23:07:24 +0000 |
---|---|---|
committer | David Aspinall <da@inf.ed.ac.uk> | 2010-07-08 23:07:24 +0000 |
commit | ab841da2555ad80b14dd7d38139e8f19a57c059f (patch) | |
tree | d18279c9413cb76a6318a7c1854a777b409a2b08 /generic/pg-xml.el | |
parent | 3f3400e0981aed4e0c6785f737aae6330af12413 (diff) |
Cleanups for save-excursion to avoid warnings in latest Emacs versions
Diffstat (limited to 'generic/pg-xml.el')
-rw-r--r-- | generic/pg-xml.el | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/generic/pg-xml.el b/generic/pg-xml.el index e8da967b..79d15b55 100644 --- a/generic/pg-xml.el +++ b/generic/pg-xml.el @@ -42,8 +42,7 @@ "Parse string in ARG, same as pg-xml-parse-buffer." (let ((tempbuffer (get-buffer-create " *xml-parse*"))) - (save-excursion - (set-buffer tempbuffer) + (with-current-buffer tempbuffer (delete-region (point-min) (point-max)) (insert arg) (pg-xml-parse-buffer (current-buffer) 'nomessage)))) |