Jumpei KAWAMI junkw

Ladicle’s Emacs Configuration ver.2022

Outline

Package Management (link)

leaf-keywords
- el-get
- hydra
package-utils

It is possible to customize the behavior of org-insert-link, so for example when you insert a link in Org-mode (using C-c C-l) that is a URL to a GitHub issue or a GitHub PR, the description of that link automatically turns into the title of that GitHub item.

For the following snippet to work, you’d have to correctly set github-forge authentication. Which boils down to creating a personal access token on GitHub and adding the following line to your ~/.authinfo (or ~/.authinfo.gpg)

machine api.github.com login USERNAME^forge password TOKEN

Hello, visitors! If you want an updated version of this styleguide in repo form with tons of real-life examples… check out Trellisheets! https://github.com/trello/trellisheets

Trello CSS Guide

“I perfectly understand our CSS. I never have any issues with cascading rules. I never have to use !important or inline styles. Even though somebody else wrote this bit of CSS, I know exactly how it works and how to extend it. Fixes are easy! I have a hard time breaking our CSS. I know exactly where to put new CSS. We use all of our CSS and it’s pretty small overall. When I delete a template, I know the exact corresponding CSS file and I can delete it all at once. Nothing gets left behind.”

You often hear updog saying stuff like this. Who’s updog? Not much, who is up with you?

UbuntuでTimeMachineサーバを建てる

※ちょっと古い

参考

	(defun diff-last-two-kills (&optional ediff?)
	"Diff last couple of things in the kill-ring. With prefix open ediff."
	(interactive "P")
	(let* ((old "/tmp/old-kill")
	(new "/tmp/new-kill")
	(prev-ediff-quit-hook ediff-quit-hook))
	(cl-flet ((kill-temps
	()
	(dolist (f (list old new))
	(kill-buffer (find-buffer-visiting f)))

	(defvar-local flycheck-eglot-current-errors nil)

	(defun flycheck-eglot-report-fn (diags &rest _)
	(setq flycheck-eglot-current-errors
	(mapcar (lambda (diag)
	(save-excursion
	(goto-char (flymake--diag-beg diag))
	(flycheck-error-new-at (line-number-at-pos)
	(1+ (- (point) (line-beginning-position)))
	(pcase (flymake--diag-type diag)

	#NoEnv ; Recommended for performance and compatibility with future AutoHotkey releases.
	#Warn ; Enable warnings to assist with detecting common errors.
	#SingleInstance force
	SendMode Input ; Recommended for new scripts due to its superior speed and reliability.

	markSet = 0
	cxPrefix = 0

	GroupAdd, EmacsControls, ahk_exe firefox.exe
	GroupAdd, EmacsControls, ahk_exe WINWORD.EXE

	(defun copy-current-line-position-to-clipboard (p)
	"Copy current line in file to clipboard as '</path/to/file>:<line-number>'"
	(interactive "sAbsolute path y/n?: ")
	(let ((path-with-line-number) (file-name (buffer-file-name)))
	(when (and (not (string= p "y")) (projectile-project-root))
	(setq file-name (file-relative-name buffer-file-name (projectile-project-root)))
	)
	(setq path-with-line-number (concat file-name ":" (number-to-string (line-number-at-pos))))
	(x-select-text path-with-line-number)
	(message (concat path-with-line-number " copied to clipboard"))))

	;;; DEFCMD.EL : no more interactive string specs

	(setq lexical-binding t)

	;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; MODULE

	(defun interactive-arg-map (l)
	(if (evenp (length l))
	(let* ((ps (-partition 2 l))
	(params (mapcar #'car ps))

	(defun galactic-emacs-eshell-prompt ()
	"Customize eshell prompt.

	This function requires `all-the-icons' package to be installed
	(https://github.com/domtronn/all-the-icons.el)."
	(if (display-graphic-p)
	(setq galactic-emacs-header-bg "#282C34")
	;; The background used when Emacs runs in a terminal
	(setq galactic-emacs-header-bg "black"))
	;; In order to set the eshell prompt correctly we need to