~ubuntu-branches/ubuntu/hardy/texmacs/hardy

« back to all changes in this revision

Viewing changes to TeXmacs/progs/convert/latex/textm.scm

  • Committer: Bazaar Package Importer
  • Author(s): Ralf Treinen
  • Date: 2004-04-19 20:34:00 UTC
  • Revision ID: james.westby@ubuntu.com-20040419203400-g4e34ih0315wcn8v
Tags: upstream-1.0.3-R2
ImportĀ upstreamĀ versionĀ 1.0.3-R2

Show diffs side-by-side

added added

removed removed

Lines of Context:
 
1
 
 
2
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 
3
;;
 
4
;; MODULE      : textm.scm
 
5
;; DESCRIPTION : finalize LaTeX -> TeXmacs conversions
 
6
;; COPYRIGHT   : (C) 2002  Joris van der Hoeven
 
7
;;
 
8
;; This software falls under the GNU general public license and comes WITHOUT
 
9
;; ANY WARRANTY WHATSOEVER. See the file $TEXMACS_PATH/LICENSE for details.
 
10
;; If you don't have this file, write to the Free Software Foundation, Inc.,
 
11
;; 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
 
12
;;
 
13
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 
14
 
 
15
(texmacs-module (convert latex textm)
 
16
  (:use
 
17
    (convert rewrite tmtm-eqns) (convert rewrite tmtm-tidy))
 
18
  (:export
 
19
    textm-finalize))
 
20
 
 
21
(define (textm-finalize l1)
 
22
  (let* ((l2 (tmtm-modernize-newlines l1))
 
23
         (l3 (tmtm-nonumber->eqnumber l2))
 
24
         (l4 (tmtm-eat-space-around-control l3))
 
25
         (l5 (tmtm-remove-superfluous-newlines l4))
 
26
         (l6 (tmtm-concat-document-correct l5)))
 
27
    l6))