takaxp

# see https://discussions.apple.com/thread/8384650
# disk2: main drive as source (SSD)
# disk2s1: Macintosh HD
# disk2s2: Preboot for disk2s1
# disk5: external drive as destination (HDD)
# disk5s1: Untitled
# disk5s2: Preboot for disk5s1
sudo vsdbutil -a /Volumes/Untitled
sudo rsync -xrlptgoEvHS --progress --delete / /Volumes/Untitled
diskutil list

takaxp

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

takaxp

#!/bin/sh

echo "Integrate GnuTLS and it's dependencies into Emacs.app"

cd ~/devel/emacs-head/emacs/nextstep/Emacs.app/Contents/MacOS
if [ -d "lib" ]; then
    rm -rf lib
fi

mkdir lib

takaxp

;; .emacs/init.el の先頭に記述
(defconst before-load-init-time (current-time))
(defun my:init-loading-time ()
  "Loading time of user init files including time for `after-init-hook'."
  (let ((time1 (float-time
                (time-subtract after-init-time before-load-init-time)))
        (time2 (float-time
                (time-subtract (current-time) before-load-init-time))))
    (message (concat "Loading init files: %.0f [msec], "
                     "of which %.f [msec] for `after-init-hook'.")

takaxp

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-26 23:01:31.000000000 +0900
--- emacs/configure.ac	2019-12-27 00:13:19.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

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

;;; iceberg256-theme.el --- Iceberg xterm256 color theme

(deftheme iceberg
  "Iceberg256 - The iceberg256 theme.")

(defvar iceberg-colors-alist
  (let* ((256color  (eq (display-color-cells (selected-frame)) 256))
     (colors `(("iceberg-accent"   . "#91acd1")
           ("iceberg-fg"       . (if ,256color "color-251" "#c6c8d1"))
           ("iceberg-bg"       . (if ,256color "color-234" "#282C34"))

takaxp

(with-eval-after-load "ox"
  (defun my-org-export-dispatch-done ()
    (when (eq this-command 'org-export-dispatch)
      (delete-window))
    (remove-hook 'post-command-hook #'my-org-export-dispatch-done))

  (defun my-moom-org-export-dispatch-done ()
    (when (eq this-command 'org-export-dispatch)
      (moom-delete-windows))
    (remove-hook 'post-command-hook #'my-moom-org-export-dispatch-done))

takaxp

diff --git a/lisp/ox.el b/lisp/ox.el
index 5b4134ecc..98846540d 100644
--- a/lisp/ox.el
+++ b/lisp/ox.el
@@ -6929,8 +6929,8 @@ options as CDR."
       (org-export--dispatch-ui options first-key expertp))
      ;; q key at first level aborts export.  At second level, cancel
      ;; first key instead.
-     ((eq key ?q) (if (not first-key) (error "Export aborted")
-		    (org-export--dispatch-ui options nil expertp)))

takaxp

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-26 14:45:40.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