src/media-uploader.scm


1
2
3
4
5
6
7
8
9

(define-module (src media-uploader)
  #:use-module (ice-9 format)
  #:export (__ignore
            upload))

(define (__ignore . rest) #f)
(define* (upload path #:key (uri  "")
                #:allow-other-keys)
 (format #t "URI: ~a  Path ~a~&" uri path))