Compare commits

...

4 commits

Author SHA1 Message Date
Benson Chu
01b4ed99ff Good thing I had the foresight to leave this here 2025-08-15 15:52:15 -05:00
Benson Chu
cf0ce2e20b Sometimes we need make 2025-08-15 15:49:34 -05:00
Benson Chu
2d3c45e6f0 Don't need that anymore 2025-08-15 15:22:02 -05:00
Benson Chu
9b009b5c6f More keys! 2025-08-15 15:21:43 -05:00
4 changed files with 32 additions and 33 deletions

View file

@ -78,33 +78,21 @@
(slot . 6)
(window-width . 80)))
;; (require 'org-capture)
(require 'org-capture)
;; (defun my/is-org-capture-buffer (buffer &optional _rest)
;; (with-current-buffer (get-buffer buffer)
;; (and (eq major-mode 'org-mode)
;; org-capture-mode)))
(defun my/is-org-capture-buffer (buffer &optional _rest)
(with-current-buffer buffer
org-capture-mode))
;; (add-to-list 'display-buffer-alist
;; `(my/is-org-capture-buffer
;; display-buffer-in-side-window
;; (side . left)
;; (select . t)
;; (window-width . 85)
;; (window-parameters
;; . ((no-delete-other-windows . t)
;; (dedicated . t)))))
;; (defun my/is-org-capture-buffer (buffer &optional _rest)
;; (with-current-buffer buffer
;; org-capture-mode))
;; (add-to-list 'display-buffer-alist
;; `(my/is-org-capture-buffer
;; display-buffer-in-side-window
;; (side . left)
;; (slot . 0)
;; (window-width . 80)))
(add-to-list 'display-buffer-alist
`(my/is-org-capture-buffer
display-buffer-in-side-window
(side . left)
(select . t)
(window-width . 85)
(window-parameters
. ((no-delete-other-windows . t)
(dedicated . t)))))
;; (pop display-buffer-alist)
#+end_src

View file

@ -136,8 +136,6 @@
** font-lock-studio
#+begin_src emacs-lisp
(use-package font-lock-studio)
(when (>= emacs-major-version 29)
(define-obsolete-function-alias 'font-lock-fontify-syntactically-region #'font-lock-default-fontify-syntactically "29.1"))
#+end_src
* pdf-tools use isearch
#+BEGIN_SRC emacs-lisp

View file

@ -37,11 +37,16 @@
(defvar llvm-core-count
(nprocs))
(defun lls/ninja-build-tools (build-dir tools-list &optional verbose)
(format "set -o pipefail && CLICOLOR_FORCE=1 ninja -C %s -j %d %s %s 2>&1 | tee ninja.log"
build-dir llvm-core-count
(if verbose "-v" "")
(string-join tools-list " ")))
(defun lls/ninja-build-tools (build-dir targets &optional verbose)
(let ((cmake-make-program
(if (string= "Makefile" (car (directory-files build-dir nil "^\\(build\\.ninja$\\|Makefile\\)$")))
"make"
"ninja")))
(format "set -o pipefail && CLICOLOR_FORCE=1 %s -C %s -j %d %s %s 2>&1 | tee ninja.log"
cmake-make-program
build-dir llvm-core-count
(if verbose "-v" "")
(string-join targets " "))))
;; =============================== Init ==============================

View file

@ -27,15 +27,23 @@
(require 'term/xterm)
(let ((ascii-start 97)
(C-M-start ?\C-\M-a))
(C-M-start ?\C-\M-a)
(M-S-start ?\M-\S-a))
(dotimes (n 26)
(define-key xterm-function-map
(format "\e[27;5;%d~" (+ ascii-start n))
(vector (1+ n)))
(define-key xterm-function-map
(format "\e[27;4;%d~" (+ ascii-start n))
(vector (+ n M-S-start)))
(define-key xterm-function-map
(format "\e[27;7;%d~" (+ ascii-start n))
(vector (+ n C-M-start)))))
(define-key xterm-function-map
"\e[27;4;13~"
[M-S-return])
(define-key xterm-function-map
"\e[27;5;8~"
[C-backspace])