This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
diff -crN emacs-25.2_orig/configure.ac emacs-25.2/configure.ac | |
*** emacs-25.2_orig/configure.ac 2017-02-03 23:34:30.000000000 +0900 | |
--- emacs-25.2/configure.ac 2017-04-25 16:52:18.000000000 +0900 | |
*************** | |
*** 1915,1921 **** | |
INSTALL_ARCH_INDEP_EXTRA= | |
fi | |
! NS_OBJC_OBJ="nsterm.o nsfns.o nsmenu.o nsselect.o nsimage.o $ns_fontfile" | |
fi |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
(with-eval-after-load "org-mac-link" | |
(defcustom org-mac-grab-Papers-app-p t | |
"Add menu option [P]apers to grab links from the Papers.app." | |
:tag "Grab Papers.app links" | |
:group 'org-mac-link | |
:type 'boolean) | |
(defun org-mac-papers-insert-front-most-paper-link () | |
(interactive) |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
;;; buffer.el --- Temporal buffer for fast boot | |
(defun buffer-mode () | |
"Buffer Mode" | |
(interactive) | |
(setq mode-name "Buffer") | |
(setq major-mode 'buffer-mode) | |
;; (setq buffer-mode-map (make-keymap)) | |
;; (use-local-map buffer-mode-map) | |
(run-hooks 'buffer-mode-hook)) |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
/* | |
チケット作成時のカスタマイズ | |
Path pattern: /issues/new$ | |
Type: JavaScript | |
*/ | |
/* | |
The original idea and code: http://qiita.com/wfigo7/items/f13a89e1d3522f4a73b6 | |
and also see https://github.com/onozaty/redmine-view-customize-scripts | |
*/ | |
$(function(){ |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
(defun my:yas-expand (&optional field) | |
"Disable `yas-expand' in src-block." | |
(interactive) | |
(if (and (equal major-mode 'org-mode) | |
(org-in-src-block-p t) | |
(not (and (fboundp 'org-src-edit-buffer-p) | |
(org-src-edit-buffer-p)))) | |
(org-cycle) | |
(yas-expand field))) | |
(define-key yas-minor-mode-map (kbd "<tab>") 'my:yas-expand))) |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
;; see https://github.com/takaxp/org-tree-slide/issues/13#issuecomment-251013783 | |
(with-eval-after-load "org-tree-slide" | |
(when (require 'hide-lines nil t) | |
(defun my:hide-headers () | |
(hide-lines-matching "#\\+BEGIN_SRC") | |
(hide-lines-matching "#\\+END_SRC")) | |
(add-hook 'org-tree-slide-play-hook 'my:hide-headers) | |
(add-hook 'org-tree-slide-stop-hook 'hide-lines-show-all))) |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
(defun mac-win-ime-toggle () | |
(interactive) | |
(mac-select-input-source | |
(concat "com.google.inputmethod.Japanese" | |
(if (string-match "\\.Roman$" (mac-input-source)) | |
".base" ".Roman")))) | |
(global-set-key (kbd "S-SPC") 'mac-win-ime-toggle) |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
(defvar mac-win-last-ime-status 'off) ;; {'off|'on} | |
(defun mac-win-save-last-ime-status () | |
(setq mac-win-last-ime-status | |
(if (string-match "\\.Roman$" (mac-input-source)) | |
'off 'on))) | |
(defun advice:mac-auto-ascii-setup-input-source (&optional _prompt) | |
"Extension to store IME status" | |
(mac-win-save-last-ime-status)) | |
(advice-add 'mac-auto-ascii-setup-input-source :before | |
#'advice:mac-auto-ascii-setup-input-source) |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
*** src/lisp/term/mac-win.el 2016-09-18 14:57:55.000000000 +0900 | |
--- dst/lisp/term/mac-win.el 2016-09-23 20:49:12.000000000 +0900 | |
*************** | |
*** 1543,1629 **** | |
(2 . mac-ts-selected-converted-text)) ; NSUnderlineStyleThick | |
"Alist of NSUnderlineStyle vs Emacs face in marked text.") | |
(defun mac-text-input-set-marked-text (event) | |
(interactive "e") | |
(let* ((ae (mac-event-ae event)) |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
#!/bin/sh | |
# The original script is here: https://gist.githubusercontent.com/railwaycat/10988446/raw/990dde69ea728b9ceff68dd649ad2112c5692ef0/build-emacs.app.sh | |
rootdir=$HOME/Desktop/emacs_mac_port | |
if [ ! -d $rootdir ]; then | |
mkdir $rootdir | |
fi | |
installprefix=$rootdir/build | |
app_dir=$installprefix/Emacs.app/Contents/Resources | |
source_url=ftp://alpha.gnu.org/gnu/emacs/pretest |