Changeset 2518 in project


Ignore:
Timestamp:
11/26/06 18:10:53 (15 years ago)
Author:
azul
Message:

Fix.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • scheme-dissect/trunk/scheme-dissect.scm

    r773 r2518  
    212212; The default function for making a header of a given depth.
    213213
    214 (define (default-make-header name depth edit)
    215   (html-stream
    216     ((a name name)
     214(define (default-make-header name depth id)
     215  (html-stream
     216    ((a name id)
    217217     (string->stream (format #f "<h~A>" (min 6 depth)))
    218218     name
Note: See TracChangeset for help on using the changeset viewer.