[= AutoGen5 Template -*- Mode: html -*- html # Time-stamp: "2005-07-01 08:29:40 bkorb" # Version: "$Revision: 1.6 $ ## Copyright (C) 2005, 2006, 2007 Free Software Foundation, Inc. ## ## This program is free software; you can redistribute it and/or modify ## it under the terms of the GNU General Public License as published by ## the Free Software Foundation; either version 3, or (at your option) ## any later version. ## ## This program is distributed in the hope that it will be useful, ## but WITHOUT ANY WARRANTY; without even the implied warranty of ## MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the ## GNU General Public License for more details. ## ## You should have received a copy of the GNU General Public License ## along with this program; if not, write to the Free Software ## Foundation, Inc., 51 Franklin Street, Fifth Floor, ## Boston, MA 02110-1301, USA. =] [=(dne " == " " [= title =]

[= project =] version [= version =] - Table of Contents

Free Software Foundation
last updated [=`date '+%B %e, %Y'`=]

 [image of the head of a GNU] (no gifs due to patent problems)


This manual ([= project =]) is available in the following formats:

[= (define proj-name (get "project")) (define fnam "") (define fsiz 0) (define (compute-size dir sfx) (begin (set! fnam (string-append dir "/" proj-name sfx)) (set! fsiz (if (access? fnam R_OK) (stat:size (stat fnam)) 0 )) (if (< fsiz 4096) (set! fsiz (number->string fsiz)) (if (< fsiz (* 2 1024 1024)) (set! fsiz (sprintf "%dK" (inexact->exact (/ fsiz 1024)))) (set! fsiz (sprintf "%dMB" (inexact->exact (/ fsiz 1048576)))) ) ) fsiz ) ) =]

(This page generated by the autogen program in conjunction with a very simple template.)