diff options
-rw-r--r-- | src/as/media-uploader.scm | 11 | ||||
-rw-r--r-- | src/media-uploader.scm | 9 |
2 files changed, 20 insertions, 0 deletions
diff --git a/src/as/media-uploader.scm b/src/as/media-uploader.scm new file mode 100644 index 0000000..2991b52 --- /dev/null +++ b/src/as/media-uploader.scm @@ -0,0 +1,11 @@ +(define-module (src as media-uploader) + #:use-module (src media-uploader) + #:export (main + post + person + media)) +(define main __ignore) +(define post __ignore) +(define person __ignore) +(define media upload) + diff --git a/src/media-uploader.scm b/src/media-uploader.scm new file mode 100644 index 0000000..50b74c1 --- /dev/null +++ b/src/media-uploader.scm @@ -0,0 +1,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)) |