Skip to content

Instantly share code, notes, and snippets.

@Metaxal
Last active February 1, 2021 13:37
Show Gist options
  • Save Metaxal/8e22dcdd48cefb61fcd843e02b345493 to your computer and use it in GitHub Desktop.
Save Metaxal/8e22dcdd48cefb61fcd843e02b345493 to your computer and use it in GitHub Desktop.
Save interactions to pdf
#lang racket/base
;; License: [Apache License, Version 2.0](http://www.apache.org/licenses/LICENSE-2.0) or
;; [MIT license](http://opensource.org/licenses/MIT) at your option.
(require quickscript
racket/class)
(script-help-string "Saves the interactions to a pdf file")
(define-script interactions->pdf
#:label "interactions->pdf"
(λ (selection #:interactions ints #:file f)
(send ints print #t #t 'pdf)
#f))
(module url2script-info racket/base
(provide filename url)
(define filename "interactions2pdf.rkt")
(define url "https://gist.github.com/Metaxal/8e22dcdd48cefb61fcd843e02b345493"))
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment