thomp

Keybase proof

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:

thomp

;; quickly generate a temporary Emacs buffer

;; mktmp.el

;; current location:
;; 

;; related:
;; https://stackoverflow.com/questions/22289271/in-gnu-emacs-how-to-create-new-empty-buffer-with-one-keystroke
;; aquamacs ~new-tab~

thomp

;; 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)

thomp

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‐

thomp

–

thomp

(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"))))

thomp

/* car and driver; road and track */
img.i-amphtml-replaced-content {
    display:none
}

div.gpt-adslot {
    display:none
}

div.content-ads {

thomp

Example of LaTeX_header for org

Misc. examples

#+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}

thomp

/*
the main page
*/ 
ytd-browse.style-scope {display: none;}
ytd-browse.ytd-page-manager {display: none;}

/*
single video page
*/

thomp

(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)))))