[Emacs-diffs] /srv/bzr/emacs/trunk r109716: Allow multiple cal-tex-buffer buffers to exist

[Glenn Morris]

------------------------------------------------------------
revno: 109716
committer: Glenn Morris <address@hidden>
branch nick: trunk
timestamp: Tue 2012-08-21 00:08:50 -0700
message:
  Allow multiple cal-tex-buffer buffers to exist
  
  * lisp/calendar/cal-tex.el (cal-tex-preamble): Generate new buffers.
  (cal-tex-end-document): Don't rely on buffer name.
modified:
  lisp/ChangeLog
  lisp/calendar/cal-tex.el

=== modified file 'lisp/ChangeLog'
--- a/lisp/ChangeLog    2012-08-21 07:01:29 +0000
+++ b/lisp/ChangeLog    2012-08-21 07:08:50 +0000
@@ -1,5 +1,8 @@
 2012-08-21  Glenn Morris  <address@hidden>
 
+       * calendar/cal-tex.el (cal-tex-preamble): Generate new buffers.
+       (cal-tex-end-document): Don't rely on buffer name.
+
        * calendar/cal-tex.el (cal-tex-cursor-filofax-year):
        Use cal-tex-vspace.
        (cal-tex-vspace, cal-tex-hspace, cal-tex-em, cal-tex-bf)

=== modified file 'lisp/calendar/cal-tex.el'
--- a/lisp/calendar/cal-tex.el  2012-08-21 07:01:29 +0000
+++ b/lisp/calendar/cal-tex.el  2012-08-21 07:08:50 +0000
@@ -253,8 +253,7 @@
   "Insert the LaTeX calendar preamble into `cal-tex-buffer'.
 Preamble includes initial definitions for various LaTeX commands.
 Optional string ARGS are included as options for the article document class."
-  ;; FIXME use generate-new-buffer, and adjust cal-tex-end-document.
-  (set-buffer (get-buffer-create cal-tex-buffer))
+  (set-buffer (generate-new-buffer cal-tex-buffer))
   (insert (format "\\documentclass%s{article}\n"
                   (if (stringp args)
                       (format "[%s]" args)
@@ -1712,7 +1711,7 @@
           ;; FIXME latin1 might not always be right.
           (insert "\\usepackage[latin1]{inputenc}\n"))))
   (latex-mode)
-  (pop-to-buffer cal-tex-buffer)
+  (pop-to-buffer (current-buffer))
   (goto-char (point-min))
   ;; FIXME auctex equivalents?
   (cal-tex-comment