.

zilti/packages/.envrc

@@ -1 +1 @@
-use guix chicken chicken-rss
+use guix chicken chicken-rss chicken-http-client

zilti/packages/chicken.scm

@@ -230,13 +230,13 @@ language standard, and includes many enhancements and extensions.")
   chicken-tiny-prolog
   (package
     (name "chicken-tiny-prolog")
-    (version "2.0")
+    (version "2.1")
     (source
       (origin
         (method url-fetch)
         (uri (egg-uri "tiny-prolog" version))
         (sha256
-          (base32 "0bw1l5vsyw2z3yvv6zlgvzk1hlm16ql6m8gdfd94fk691pvjpnd0"))))
+          (base32 "0zz468zvr7v1dh2sg48kmlq43dbim66md3dv2dchdpzfjg378w8k"))))
     (propagated-inputs (specifications->packages (list "chicken-srfi-69")))
     (native-inputs (specifications->packages (list "chicken-test")))
     (build-system chicken-build-system)
@@ -915,13 +915,13 @@ language standard, and includes many enhancements and extensions.")
   chicken-intarweb
   (package
     (name "chicken-intarweb")
-    (version "2.0.3")
+    (version "2.1.0")
     (source
       (origin
         (method url-fetch)
         (uri (egg-uri "intarweb" version))
         (sha256
-          (base32 "1vpdrbrmjsdbl4cb3c82iqcvyn9318jzapg6bl00dkbn6ykyisr3"))))
+          (base32 "0khzz6w8dh8sbiaqw3b68p0v8lv4bjwxipkb9cqj2q9r7zl84555"))))
     (propagated-inputs
       (specifications->packages
         (list "chicken-srfi-1"
@@ -6475,13 +6475,13 @@ language standard, and includes many enhancements and extensions.")
   chicken-getopt-utils
   (package
     (name "chicken-getopt-utils")
-    (version "1.1.0")
+    (version "1.1.1")
     (source
       (origin
         (method url-fetch)
         (uri (egg-uri "getopt-utils" version))
         (sha256
-          (base32 "0jbzv8s0b3pnlqzl4vls0fssw56ivz1g9afdj90kxaxlxv1b1l0k"))))
+          (base32 "0i17fj29zbbm05x68h7fy524ypk8vbr62gq6jkrwf18371l0l767"))))
     (propagated-inputs
       (specifications->packages
         (list "chicken-utf8" "chicken-srfi-1" "chicken-getopt-long")))
@@ -6518,13 +6518,13 @@ language standard, and includes many enhancements and extensions.")
   chicken-salmonella
   (package
     (name "chicken-salmonella")
-    (version "3.0.1")
+    (version "3.1.1")
     (source
       (origin
         (method url-fetch)
         (uri (egg-uri "salmonella" version))
         (sha256
-          (base32 "1xr01d9ax106c5q3xx0lj92q24jqiywasamimpzvda4b17bb34n5"))))
+          (base32 "1r60dlr1qcjlirbwqpn23aphczlkhrhskgqmw51973w46ww839nf"))))
     (propagated-inputs (specifications->packages (list)))
     (native-inputs (specifications->packages (list "chicken-test")))
     (build-system chicken-build-system)
@@ -10026,6 +10026,26 @@ language standard, and includes many enhancements and extensions.")
       "A tool to convert and keep henrietta's cache in a git repository")
     (license license:bsd-2)))
 
+(define-public
+  chicken-mosquitto
+  (package
+    (name "chicken-mosquitto")
+    (version "0.1.3")
+    (source
+      (origin
+        (method url-fetch)
+        (uri (egg-uri "mosquitto" version))
+        (sha256
+          (base32 "0v03hljm71hl6xr1pffzcpk2izil9w2sp9k68a7iirvpcvqg9iph"))))
+    (propagated-inputs (specifications->packages (list "chicken-srfi-1")))
+    (native-inputs (specifications->packages (list "chicken-test")))
+    (build-system chicken-build-system)
+    (arguments '(#:egg-name "mosquitto"))
+    (synopsis "Bindings to mosquitto MQTT client library")
+    (home-page "https://wiki.call-cc.org/eggref/5/mosquitto")
+    (description "Bindings to mosquitto MQTT client library")
+    (license license:expat)))
+
 (define-public
   chicken-byte-blob
   (package
@@ -11332,6 +11352,26 @@ language standard, and includes many enhancements and extensions.")
     (description "Serve extensions over HTTP")
     (license license:bsd-2)))
 
+(define-public
+  chicken-scheme-indent
+  (package
+    (name "chicken-scheme-indent")
+    (version "0.5")
+    (source
+      (origin
+        (method url-fetch)
+        (uri (egg-uri "scheme-indent" version))
+        (sha256
+          (base32 "0brwmphr724shd32dcixsn9wz9zqrhg27g7rjbiz96885maj6nwf"))))
+    (propagated-inputs (specifications->packages (list "chicken-srfi-1")))
+    (native-inputs (specifications->packages (list)))
+    (build-system chicken-build-system)
+    (arguments '(#:egg-name "scheme-indent"))
+    (synopsis "A Scheme code indenter")
+    (home-page "https://wiki.call-cc.org/eggref/5/scheme-indent")
+    (description "A Scheme code indenter")
+    (license license:bsd-2)))
+
 (define-public
   chicken-simple-tests
   (package
@@ -12269,13 +12309,13 @@ language standard, and includes many enhancements and extensions.")
   chicken-make-tests
   (package
     (name "chicken-make-tests")
-    (version "1.10")
+    (version "1.12")
     (source
       (origin
         (method url-fetch)
         (uri (egg-uri "make-tests" version))
         (sha256
-          (base32 "0ca8fx40x42zqqsp3dmw5cb9xsjlz4cp71yh9kgcb29n4ig80r97"))))
+          (base32 "174nbjy27iiz29g906p9rsg036mgwjnl7ll0qc2clqzq1svkgqc7"))))
     (propagated-inputs
       (specifications->packages
         (list "chicken-brev-separate" "chicken-srfi-1" "chicken-uri-common")))
@@ -13034,13 +13074,13 @@ language standard, and includes many enhancements and extensions.")
   chicken-check-errors
   (package
     (name "chicken-check-errors")
-    (version "3.7.1")
+    (version "3.8.0")
     (source
       (origin
         (method url-fetch)
         (uri (egg-uri "check-errors" version))
         (sha256
-          (base32 "1ra8pvs0qnfqsjbrsn0k94drwx5ydvhapziv6dcqcb118iimnrmd"))))
+          (base32 "09ffyffrv3gamjsjgbisn3yxb40wbqy5pfrs6dxw20n1ffimgfw5"))))
     (propagated-inputs (specifications->packages (list)))
     (native-inputs
       (specifications->packages (list "chicken-test" "chicken-test-utils")))

zilti/packages/egg-generator.cscm

@@ -115,8 +115,8 @@
   (let
       ((eggrecs (map rss-feed-item->title+version+desc
                      (rss:feed-items
-                      (with-input-from-file "/home/zilti/projects/guixchannel/zilti/packages/chicken-eggs-5.xml"
+                      (with-input-from-request
-                        rss:read)))))
+                       "http://eggs.call-cc.org/rss-5.xml" #f rss:read)))))
     (set! eggs eggrecs)
     (map egg-add-deps+license eggrecs)
     eggrecs))
@@ -166,5 +166,5 @@
       #:text #:append)))
 
 (define (main #!optional args)
-  (copy-file "chicken-template.scm" "chicken.scm" #t)
+  (copy-file "chicken-template.cscm" "chicken.scm" #t)
   (map generate-guix-package (parse-rss)))