summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--flora/services/trainspotter.scm12
1 files changed, 6 insertions, 6 deletions
diff --git a/flora/services/trainspotter.scm b/flora/services/trainspotter.scm
index 860f0ab..00e8d17 100644
--- a/flora/services/trainspotter.scm
+++ b/flora/services/trainspotter.scm
@@ -26,20 +26,20 @@
(print (format "the url's hash has changed to ~s!" newhash))
(let ([newfile (string-append storagedir "/" newhash)])
(do-process `(curl ,url "-o" ,newfile))
- (let ([diff (if oldhash
- (let ([oldfile (string-append storagedir "/" oldhash)])
- (process-output->string `(zipcmp ,oldfile ,newfile)))
- "")])
+ (let ( ;[diff (if oldhash
+ ; (let ([oldfile (string-append storagedir "/" oldhash)])
+ ; (process-output->string `(zipcmp ,oldfile ,newfile)))
+ ;"")]
+ )
(do-pipeline `((echo ,(format "
Neuer hash ist ~a
Link ist ~a
-~a
(~a)
-" newhash url diff pretty-date))
+" newhash url pretty-date))
(mail "-s" "Ilztalbahn GTFS Update"
"stuebinm@disroot.org"
"-a" "From: trainspotter@flora.stuebinm.eu")))