Skip to content

Instantly share code, notes, and snippets.

View takaxp's full-sized avatar
🦄
Emacs Org Mode

Takaaki ISHIKAWA takaxp

🦄
Emacs Org Mode
View GitHub Profile
@takaxp
takaxp / emacs-27.0-inline-googleime.patch
Last active December 26, 2019 23:24
An inline patch for Emacs 27 (googleime, locale=en) (see also https://qiita.com/takaxp/items/e07bb286d80fa9dd8e05)
diff --exclude .git --exclude '*.o' --exclude .DS_Store --exclude '*TAGS' --exclude lib --exclude nextstep -crN emacs_orig/configure.ac emacs/configure.ac
*** emacs_orig/configure.ac 2019-12-27 03:23:17.000000000 +0900
--- emacs/configure.ac 2019-12-27 03:24:01.000000000 +0900
***************
*** 2073,2079 ****
INSTALL_ARCH_INDEP_EXTRA=
fi
! NS_OBJC_OBJ="nsterm.o nsfns.o nsmenu.o nsselect.o nsimage.o $ns_fontfile"
fi
@takaxp
takaxp / allow-emacs.sh
Last active February 7, 2019 07:18
Run this script after building Emacs locally for Mojave
#!/bin/sh
file="/Applications/Emacs.app"
version=`${file}/Contents/MacOS/Emacs -batch --eval="(princ (format \"%s.%s@%s\" emacs-major-version emacs-minor-version (substring emacs-repository-version 0 10)))"`
application="Emacs"${version}""
date=$(printf %x $(date +%s))
uuid=$(/usr/bin/uuidgen)
/usr/bin/xattr -w com.apple.quarantine "0002;${date};${application};${uuid}" "${file}"
open "x-apple.systempreferences:com.apple.preference.security"
@takaxp
takaxp / my-agenda-to-appt-async.el
Created January 18, 2019 02:38
org-agenda-to-appt with async.el
(when (autoload-if-found
'(appt my-org-agenda-to-appt ad:appt-display-message
ad:appt-disp-window)
"appt" nil t)
(with-eval-after-load "postpone"
(global-set-key (kbd "C-c f 3") #'my-org-agenda-to-appt))
(with-eval-after-load "appt"
;; window を フレーム内に表示する
@takaxp
takaxp / move-cursor-hook.el
Last active December 3, 2018 07:40
move-cursor-hook
(defcustom move-cursor-hook nil
"Hook runs when you move the cursor."
:type 'hook
:group 'convenience)
(defun ad:cur:next-line (&optional _arg _try-vscroll)
(run-hooks 'move-cursor-hook))
(defun ad:cur:previous-line (&optional _arg _try-vscroll)
(run-hooks 'move-cursor-hook))
(defun ad:cur:forward-char (&optional _N)
@takaxp
takaxp / night-theme.el
Last active September 9, 2022 22:05
my theme for dark
;;; night-theme.el --- Night Theme
(deftheme night
"Night Theme")
(custom-theme-set-faces
'night
;; '(default ((t (:stipple nil :background "#31343F" :foreground "#abb2bf" :inverse-video nil :box nil :strike-through nil :overline nil :underline nil :slant normal :weight normal :height 120 :width normal :foundry "nil" :family "Monaco"))))
'(default ((t (:stipple nil :background "#31343F" :foreground "#abb2bf" :inverse-video nil :box nil :strike-through nil :overline nil :underline nil :slant normal :width normal :foundry "nil"))))
'(bold ((t (:weight bold))))
@takaxp
takaxp / daylight-theme.el
Last active September 9, 2022 22:05
my theme for light
;;; daylight-theme.el --- my default theme
(deftheme daylight
"my default theme")
(custom-theme-set-faces
'daylight
;; '(default ((t (:stipple nil :background "White" :foreground "Black" :inverse-video nil :box nil :strike-through nil :overline nil :underline nil :slant normal :weight normal :height 120 :width normal :foundry "nil" :family "Monaco"))))
'(default ((t (:stipple nil :background "White" :foreground "Black" :inverse-video nil :box nil :strike-through nil :overline nil :underline nil :slant normal :width normal :foundry "nil"))))
'(bold ((t (:weight bold))))
diff -crN emacs-26.0.91/src/nsfns.m emacs-26.0.91_patch/src/nsfns.m
*** emacs-26.0.91/src/nsfns.m 2018-03-20 18:41:09.000000000 +0900
--- emacs-26.0.91_patch/src/nsfns.m 2018-03-20 18:42:52.000000000 +0900
***************
*** 1231,1239 ****
x_default_parameter (f, parms, Qborder_width, make_number (0),
"borderwidth", "BorderWidth", RES_TYPE_NUMBER);
! x_default_parameter (f, parms, Qinternal_border_width, make_number (2),
! "internalBorderWidth", "InternalBorderWidth",
@takaxp
takaxp / emacs-improved.sh
Last active October 7, 2018 01:08
Apply UI improved patch to GNU Emacs
#!/bin/sh
# see https://github.com/emacs-mirror/emacs/pull/6#issue-79644890
cd ~/Desktop
if [ -d emacs ]; then
echo "You already have a Emacs dir in Desktop. Delete it first."
exit;
fi
git clone git://git.sv.gnu.org/emacs.git
@takaxp
takaxp / pennywize.srt
Last active October 3, 2018 18:27 — forked from mattn/pennywize.srt
1
00:00:08,0 --> 00:00:10,0
あぁ!僕のテキストファイルが!
2
00:00:18,300 --> 00:00:19,500
ハーイ、ジョージィ!
3
00:00:23,0 --> 00:00:25,0
@takaxp
takaxp / ns-26.1.50-mojave.sh
Last active September 24, 2019 15:53
Build script for NS build for macOS Mojave (26.1.50) (see also https://qiita.com/takaxp/items/e07bb286d80fa9dd8e05)
#!/bin/sh
cd ~/Desktop
git clone git://git.sv.gnu.org/emacs.git
cd emacs
git checkout -b emacs-26
git reset --hard 9ad0f1d15c