I hereby claim:
- I am thomp on github.
- I am dthomp (https://keybase.io/dthomp) on keybase.
- I have a public key ASCxAIFMFXn8f8LosijWg72aaNgv1gGwtjYaz3tI1Z2B3go
To claim this, I am signing this object:
I hereby claim:
To claim this, I am signing this object:
| ;; quickly generate a temporary Emacs buffer | |
| ;; mktmp.el ==> qtb.el | |
| ;; ==> change to qtb = quick temporary buffer | |
| ;; current location: | |
| ;; https://gist.github.com/thomp/0a8ed29b2094fdf43536a151722ebe6a | |
| ;; related: |
| ;; https://gist.github.com/thomp/ff0fb98d4239af4e3f26a7b0cc64f4b6 | |
| (require 'transient) | |
| ;; simple transient | |
| (transient-define-prefix tsc-hello () | |
| "Prefix that is minimal and uses an anonymous command suffix." | |
| ;; Binding suffixes with the ("key" "description" suffix-or-command) form within a group is extremely common. | |
| [("s" "call suffix" | |
| (lambda () | |
| (interactive) |
| ASCII(7) Linux Programmer's Manual ASCII(7) | |
| NAME | |
| ascii - ASCII character set encoded in octal, decimal, | |
| and hexadecimal | |
| DESCRIPTION | |
| ASCII is the American Standard Code for Information In‐ | |
| terchange. It is a 7-bit code. Many 8-bit codes (e.g., | |
| ISO 8859-1) contain ASCII as their lower half. The in‐ |
| (defun dat-url-of-dired-file () | |
| "Add to the kill ring the URL for tthe file named at the current Dired point." | |
| (interactive) | |
| (let ((tem (dired-get-filename t t))) | |
| (if tem | |
| ; (message "file: %s" | |
| (kill-new | |
| (concatenate 'string "file://" | |
| (expand-file-name tem))) | |
| (error "No file on this line")))) |
| /* car and driver; road and track */ | |
| img.i-amphtml-replaced-content { | |
| display:none | |
| } | |
| div.gpt-adslot { | |
| display:none | |
| } | |
| div.content-ads { |
#+LaTeX_HEADER: \usepackage{parskip} \usepackage{nopageno} \usepackage{tabularx}
#+LaTeX_HEADER: \usepackage[margin=1.5cm,portrait,letterpaper]{geometry} \newenvironment{identity} {\endgroup\ignorespaces} {\begingroup\def\@currenvir{identity}\ignorespacesafterend}
| /* | |
| the main page | |
| */ | |
| ytd-browse.style-scope {display: none;} | |
| ytd-browse.ytd-page-manager {display: none;} | |
| /* | |
| single video page | |
| */ |
| (defvar dat-diary-idle-timer | |
| ;; day of week | |
| (let ((dat-ran-diary-on-day -1) | |
| (idle-sec 600)) | |
| (run-with-idle-timer | |
| idle-sec | |
| t | |
| #'(lambda () | |
| ;; check if we've run diary yet today | |
| (let ((day-number (calendar-day-of-week (calendar-current-date))))) |