mailing-list for TeXmacs Users

[Patrick CARDONA <address@hidden>]

On Thu, Feb 13, 2003 at 12:04:24PM +0100, address@hidden wrote:
> On Thu, Feb 13, 2003 at 11:48:32AM +0100, Patrick CARDONA wrote:
> [...]
> 
> You can find a lot of discussion (and a package I designed) about this
> on the mailing list archive.
> 
Thank you for your answers.

I found a file merged in the body of a message posted on november 2001 to 
Vicent:
I copied it in my ~/.Texmacs/styles under the name 'entete.ts'.

Then I made a test file ('un_autre_essai.tm') in TexMacs with the style 
'article' and the package
'entete'.

I do 'make a title', and many page breaks, etc.
But when I look in gv, I see no header but <error|expand superpose> ...
Whad did I make wrong ?

Here are the files :
1) entete.ts
2) un_autre_essai.tm

Bye,
Patrick
<TeXmacs|1.0.0.1>

<style|<tuple|article|entete>>

<\body>
  <\expand|make-title>
    <title|>

    <title|Le titre>

    <author|Patrick Cardona>

    <address|Chez moi>

    <expand|title-date|<date|%d %B %Y>>
  </expand>

  Vraiment ...

  <format|page break>

  Un saut de page

  <format|page break>

  Un autre saut

  <format|page break>

  Encore un autre
</body>

<\initial>
  <\collection>
    <associate|preamble|false>
    <associate|paragraph width|150mm>
    <associate|odd page margin|30mm>
    <associate|page right margin|30mm>
    <associate|page top margin|30mm>
    <associate|reduction page right margin|25mm>
    <associate|page type|a4>
    <associate|reduction page bottom margin|15mm>
    <associate|even page margin|30mm>
    <associate|reduction page left margin|25mm>
    <associate|page bottom margin|30mm>
    <associate|reduction page top margin|15mm>
    <associate|language|french>
  </collection>
</initial>
<TeXmacs|1.0.1>

<\body>
  Utility macros for use with superpose.

  <assign|paragraph table|<macro|x|<tformat|<twith|table
  width|1par>|<cwith|1|-1|1|-1|cell lsep|0>|<cwith|1|-1|1|-1|cell
  rsep|0>|<cwith|1|-1|1|-1|cell bsep|0>|<cwith|1|-1|1|-1|cell
  tsep|0>|<arg|x>>>>

  <assign|paragraph right|<macro|x|<expand|paragraph
  table|<tformat|<cwith|1|-1|1|-1|cell 
halign|r>|<table|<row|<cell|<arg|x>>>>>>>>

  <assign|paragraph center|<macro|x|<expand|paragraph
  table|<tformat|<cwith|1|-1|1|-1|cell 
halign|c>|<table|<row|<cell|<arg|x>>>>>>>>

  \;

  Put the title and author text in variables for use by headers.

  <assign|the title|>

  <assign|header-title|<func|title|<assign|the title|<value|title>>>>

  <assign|the author|>

  <assign|header-author|<func|author|<assign|the author|<value|author>>>>

  \;

  Header with naive alignement (may look better in some cases)

  <assign|page header 1|<quote|<with|font size|0.84|<format|no first
  indentation><with|font shape|small-caps|<quote|<value|the
  title>><htab|5mm><quote|<value|the 
author>>><htab|5mm><quote|<apply|thepage>>>>>

  Header with forced alignment (so centered is really centered)

  <assign|page header 2|<quote|<with|font size|0.84|<format|no first
  indentation><superpose|<with|font shape|small-caps|<quote|<value|the
  title>>>|<with|font shape|small-caps|<expand|paragraph
  center|<quote|<value|the author>>>>|<expand|paragraph
  right|<quote|<apply|thepage>>>>>>>

  The kind of header we actually want to use

  <assign|page header|<quote|<value|page header 2>>>

  \;

  Set the global header variables

  <assign|odd page header|<value|page header>>

  <assign|even page header|<value|page header>>

  Disable redefinition of the header and footer by sections

  <assign|odd-page-text|<func|s|>>

  <assign|even-page-text|<func|s|>>
</body>

<\initial>
  <\collection>
    <associate|preamble|true>
    <associate|paragraph width|150mm>
    <associate|odd page margin|30mm>
    <associate|page right margin|30mm>
    <associate|page top margin|30mm>
    <associate|reduction page right margin|25mm>
    <associate|page type|a4>
    <associate|reduction page bottom margin|15mm>
    <associate|even page margin|30mm>
    <associate|reduction page left margin|25mm>
    <associate|page bottom margin|30mm>
    <associate|reduction page top margin|15mm>
    <associate|language|french>
  </collection>
</initial>