mailing-list for TeXmacs Users

[Victor Porton <address@hidden>]

31.10.2013, 10:07, "François Poulain" <address@hidden>:
> Hi,
>
> See TeXmacs/progs/generic/document-menu.scm for details.
>
> Le Thu, 31 Oct 2013 00:16:25 +0200,
> Victor Porton <address@hidden> a écrit :
>
>>  - switch page type to "Paper"
>
> This is done with : (init-page-medium "paper")
>
>>  - call "Update All" 6 times (or how many is enough?)
>
> This is done with :
> (begin
>   (generate-all-aux)
>   (inclusions-gc)
>   (wait-update-current-buffer))
>
>>  - switch page type back
>
> This is done with : (init-page-medium "papyrus")
>
>>  Also help to attach this script to the user's toolbar.
>
> I don't advise you to to this. You can very simply add a shortcut with
> something like : (kbd-map ("C-U" (my-refresh-buffer)))

(define my-refresh-buffer
  (begin
    (init-page-medium "paper")

    (generate-all-aux)
    (inclusions-gc)
    (wait-update-current-buffer))

    (generate-all-aux)
    (inclusions-gc)
    (wait-update-current-buffer))

    (generate-all-aux)
    (inclusions-gc)
    (wait-update-current-buffer))

    (generate-all-aux)
    (inclusions-gc)
    (wait-update-current-buffer))

    (generate-all-aux)
    (inclusions-gc)
    (wait-update-current-buffer))

    (generate-all-aux)
    (inclusions-gc)
    (wait-update-current-buffer)

    (init-page-medium "papyrus"))
)

/home/porton/.TeXmacs/progs/my-init-texmacs.scm:11:1: In procedure 
memoization in expression (define my-refresh-buffer (init-page-medium 
"paper") ...):
/home/porton/.TeXmacs/progs/my-init-texmacs.scm:11:1: In file 
"/home/porton/.TeXmacs/progs/my-init-texmacs.scm", line 10: Missing or extra 
expression in (define my-refresh-buffer (init-page-medium "paper") 
(generate-all-aux) (inclusions-gc) (wait-update-current-buffer)).

What's wrong?

-- 
Victor Porton - http://portonvictor.org