← Back to branch summary

~ubuntu-branches/ubuntu/vivid/muse-el/vivid

« back to all changes in this revision

Viewing changes to lisp/muse-poem.el

  • Committer: Bazaar Package Importer
  • Author(s): Michael W. Olson (GNU address)
  • Date: 2007-06-25 08:17:44 UTC
  • mfrom: (1.1.3 upstream)
  • Revision ID: james.westby@ubuntu.com-20070625081744-h9xfz7c72h1pfyo6
Tags: 3.03-1ubuntu1
https://launchpad.net/bugs/123907
* Closes LP: #123907
* Sync with Debian.  Remaining changes:
  - Keep (add) manual.
* debian/control:
  - Set Ubuntu MOTU to be Maintainer and myself as
    XSBC-Original-Maintainer to silence warning.
* debian/rules;
  - Manual is now in texi/ directory.
  - Clean generated html files and info file for the manual.

Show diffs side-by-side

added added

removed removed

Lines of Context:
lisp/muse-poem.el
1
1
;;; muse-poem.el --- publish a poem to LaTex or PDF
2
2
 
3
 
;; Copyright (C) 2004, 2005 Free Software Foundation, Inc.
 
3
;; Copyright (C) 2004, 2005, 2006, 2007 Free Software Foundation, Inc.
4
4
 
5
5
;; This file is part of Emacs Muse.  It is not part of GNU Emacs.
6
6
 
190
190
      (forward-line 1))
191
191
    nil))
192
192
 
193
 
(defvar muse-poem-tag '("poem" nil t muse-poem-markup-tag))
 
193
(defvar muse-poem-tag '("poem" nil t nil muse-poem-markup-tag))
194
194
 
195
195
(defun muse-poem-markup-tag (beg end attrs)
196
196
  "This markup tag allows a poem to be included from another project page.
228
228
 
229
229
(add-to-list 'muse-publish-markup-tags muse-poem-tag)
230
230
 
231
 
(unless (assoc "poem-latex" muse-publishing-styles)
232
 
  (muse-derive-style "poem-latex" "latex"
233
 
                     :before  'muse-poem-prepare-buffer
234
 
                     :strings 'muse-poem-markup-strings
235
 
                     :header  'muse-poem-latex-header
236
 
                     :footer  'muse-poem-latex-footer)
237
 
 
238
 
  (muse-derive-style "poem-pdf" "pdf"
239
 
                     :before  'muse-poem-prepare-buffer
240
 
                     :strings 'muse-poem-markup-strings
241
 
                     :header  'muse-poem-latex-header
242
 
                     :footer  'muse-poem-latex-footer)
243
 
 
244
 
  (muse-derive-style "chapbook-latex" "latex"
245
 
                     :before  'muse-poem-prepare-buffer
246
 
                     :strings 'muse-poem-chapbook-strings
247
 
                     :header  'muse-chapbook-latex-header
248
 
                     :footer  'muse-chapbook-latex-footer)
249
 
 
250
 
  (muse-derive-style "chapbook-pdf" "pdf"
251
 
                     :before  'muse-poem-prepare-buffer
252
 
                     :strings 'muse-poem-chapbook-strings
253
 
                     :header  'muse-chapbook-latex-header
254
 
                     :footer  'muse-chapbook-latex-footer))
 
231
;;; Register the Muse POEM Publishers
 
232
 
 
233
(muse-derive-style "poem-latex" "latex"
 
234
                   :before  'muse-poem-prepare-buffer
 
235
                   :strings 'muse-poem-markup-strings
 
236
                   :header  'muse-poem-latex-header
 
237
                   :footer  'muse-poem-latex-footer)
 
238
 
 
239
(muse-derive-style "poem-pdf" "pdf"
 
240
                   :before  'muse-poem-prepare-buffer
 
241
                   :strings 'muse-poem-markup-strings
 
242
                   :header  'muse-poem-latex-header
 
243
                   :footer  'muse-poem-latex-footer)
 
244
 
 
245
(muse-derive-style "chapbook-latex" "latex"
 
246
                   :before  'muse-poem-prepare-buffer
 
247
                   :strings 'muse-poem-chapbook-strings
 
248
                   :header  'muse-chapbook-latex-header
 
249
                   :footer  'muse-chapbook-latex-footer)
 
250
 
 
251
(muse-derive-style "chapbook-pdf" "pdf"
 
252
                   :before  'muse-poem-prepare-buffer
 
253
                   :strings 'muse-poem-chapbook-strings
 
254
                   :header  'muse-chapbook-latex-header
 
255
                   :footer  'muse-chapbook-latex-footer)
255
256
 
256
257
(provide 'muse-poem)
257
258