summary |
shortlog |
log |
commit | commitdiff |
tree
raw |
patch |
inline | side by side (from parent 1:
6df4121)
for compatibility with pre 7.4.0.4 Racket
(define pkg-desc
"twtxt client")
(define version
(define pkg-desc
"twtxt client")
(define version
(define pkg-authors
'("Siraaj Khandkar <siraaj@khandkar.net>"))
(define deps
(define pkg-authors
'("Siraaj Khandkar <siraaj@khandkar.net>"))
(define deps
(define user-agent
(let*
([prog-name "tt"]
(define user-agent
(let*
([prog-name "tt"]
[prog-uri "https://github.com/xandkar/tt"]
[user-feed-file (expand-user-path "~/twtxt-me.txt")]
[user
[prog-uri "https://github.com/xandkar/tt"]
[user-feed-file (expand-user-path "~/twtxt-me.txt")]
[user
(define args (current-command-line-arguments))
(define feeds
(define args (current-command-line-arguments))
(define feeds
- (if (vector-empty? args)
+ (if (= 0 (vector-length args))
(we-are-twtxt)
(file->feeds (vector-ref args 0))))
(define out-format 'multi-line)
(we-are-twtxt)
(file->feeds (vector-ref args 0))))
(define out-format 'multi-line)