Skip to content

Commit

Permalink
fixing manual generation
Browse files Browse the repository at this point in the history
  • Loading branch information
dyoo committed Feb 6, 2013
1 parent 16b5d96 commit 169d8b8
Showing 1 changed file with 15 additions and 8 deletions.
23 changes: 15 additions & 8 deletions ragg/manual.scrbl
Expand Up @@ -9,13 +9,20 @@
(only-in syntax/parse syntax-parse ~literal)))


@(define (lookup-date filename)
(define modify-seconds (file-or-directory-modify-seconds filename))
(define a-date (seconds->date modify-seconds))
(date->string a-date))
@(define (lookup-date filename [default ""])
(cond
[(file-exists? filename)
(define modify-seconds (file-or-directory-modify-seconds filename))
(define a-date (seconds->date modify-seconds))
(date->string a-date)]
[else
default]))

@(define (compute-md5sum filename)
(bytes->string/utf-8 (call-with-input-file filename md5 #:mode 'binary)))
@(define (compute-md5sum filename [default ""])
(cond [(file-exists? filename)
(bytes->string/utf-8 (call-with-input-file filename md5 #:mode 'binary))]
[else
default]))



Expand Down Expand Up @@ -188,9 +195,9 @@ of Racket > 5.3.1, then follow the instructions on the

@item{For those who are using Racket <= 5.3.1, you can download the following PLT package:

@nested[#:style 'inset]{@link["ragg.plt"]{ragg.plt} [md5sum: @compute-md5sum{ragg.plt}]
@nested[#:style 'inset]{@link["ragg.plt"]{ragg.plt} [md5sum: @compute-md5sum["ragg.plt" "ab79038b40e510a5cf13363825c4aef4"]]

Last updated: @lookup-date{ragg.plt}
Last updated: @lookup-date["ragg.plt" "Wednesday, January 16th, 2013"]
}

Once downloaded, either use DrRacket's package installation features
Expand Down

0 comments on commit 169d8b8

Please sign in to comment.