diff options
author | colin <colin@cicadas.surf> | 2024-08-11 19:52:19 -0700 |
---|---|---|
committer | colin <colin@cicadas.surf> | 2024-08-11 19:52:19 -0700 |
commit | 4be1a20fa252c43880b94d1a92cee00e822f1aa6 (patch) | |
tree | c6b6b894a015b97febd07ecce8ca1f768df19ee1 /README.org |
initial commit
Diffstat (limited to 'README.org')
-rw-r--r-- | README.org | 49 |
1 files changed, 49 insertions, 0 deletions
diff --git a/README.org b/README.org new file mode 100644 index 0000000..afadb0a --- /dev/null +++ b/README.org @@ -0,0 +1,49 @@ + +** Build and Run + +There is a =build.lisp= file in this repo, build an executable like so: + + +#+begin_src shell + +sbcl --load build.lisp + +#+end_src + +Run the pastiche executable like so: + +#+begin_src shell + +./pastiche /path/to/pastiche.conf + +#+end_src + +There is an example of what =pastiche.conf= looks like in this directory. + + +** Using With Emacs + +First, this uses ~http-post-simple.el~, a copy of which can be found in the ~emacs/~ subdirectory. + +Make sure that is loaded, then: + +#+begin_src elisp + +(defvar pastiche-paste-url "the real url here") + +(defun pastiche-paste-current-buffer () + (interactive) + (let* ((content + (buffer-string)) + (title + (buffer-name)) + (result + (http-post-simple + pastiche-paste-url + (list (cons 'title title) + (cons 'content content))))) + (let ((url (first result))) + (kill-new url) + (message url)))) + +#+end_src |