mirror of
http://github.com/JaeUs3792/dotfiles
synced 2025-12-14 08:01:35 +09:00
EMACS : undo tree directroy🌞
This commit is contained in:
@ -1,4 +0,0 @@
|
|||||||
(undo-tree-save-format-version . 1)
|
|
||||||
"4a5393278893732c0283cee67786bb2a47c5180c"
|
|
||||||
[nil current nil nil (25137 37704 59576 695000) 0 nil]
|
|
||||||
nil
|
|
||||||
@ -1,9 +0,0 @@
|
|||||||
(undo-tree-save-format-version . 1)
|
|
||||||
"b20f26d4c1a610976323cc8ba3e3402825a52087"
|
|
||||||
[nil nil nil nil (25137 43379 69396 762000) 0 nil]
|
|
||||||
([nil nil ((6791 . 6793) (6790 . 6791) (t 25137 43364 922509 987000) 6754) nil (25137 43387 694003 567000) 0 nil])
|
|
||||||
([nil current ((#("
|
|
||||||
|
|
||||||
|
|
||||||
" 0 1 (fontified t ws-butler-chg chg) 1 2 (fontified t ws-butler-chg chg) 2 3 (fontified t)) . 6791) (6794 . 6794)) nil (25137 43387 694000 103000) 0 nil])
|
|
||||||
nil
|
|
||||||
@ -1,4 +0,0 @@
|
|||||||
(undo-tree-save-format-version . 1)
|
|
||||||
"6219c0e3ab970e5c7a9cb17402a3d8be54b7c012"
|
|
||||||
[nil current nil nil (25137 37704 42936 540000) 0 nil]
|
|
||||||
nil
|
|
||||||
@ -21,6 +21,13 @@
|
|||||||
;;(require 'rational-windows)
|
;;(require 'rational-windows)
|
||||||
(require 'rational-use-package)
|
(require 'rational-use-package)
|
||||||
|
|
||||||
|
;; backup in one place. flat, no tree structure
|
||||||
|
(setq backup-directory-alist '(("." . "~/.emacs.rational.d/backups")))
|
||||||
|
(customize-set-variable
|
||||||
|
'tramp-backup-directory-alist backup-directory-alist)
|
||||||
|
(setq undo-tree-history-directory-alist '(("." . "~/.emacs.rational.d/undo")))
|
||||||
|
|
||||||
|
|
||||||
(setq user-full-name "JaeYoo-Im"
|
(setq user-full-name "JaeYoo-Im"
|
||||||
user-mail-address "cpu3792@gmail.com")
|
user-mail-address "cpu3792@gmail.com")
|
||||||
|
|
||||||
@ -101,7 +108,7 @@
|
|||||||
(setq dashboard-items '((recents . 10)
|
(setq dashboard-items '((recents . 10)
|
||||||
(agenda . 5)
|
(agenda . 5)
|
||||||
(bookmarks . 5)
|
(bookmarks . 5)
|
||||||
;;(projects . 5)
|
;;(projects . 5) <= related projectile
|
||||||
(registers . 5)))
|
(registers . 5)))
|
||||||
(setq dashboard-set-navigator t)
|
(setq dashboard-set-navigator t)
|
||||||
;; Format: "(icon title help action face prefix suffix)"
|
;; Format: "(icon title help action face prefix suffix)"
|
||||||
@ -142,9 +149,9 @@
|
|||||||
;; Also handle undocumented (<active> <inactive>) form.
|
;; Also handle undocumented (<active> <inactive>) form.
|
||||||
((numberp (cadr alpha)) (cadr alpha)))
|
((numberp (cadr alpha)) (cadr alpha)))
|
||||||
100)
|
100)
|
||||||
'(75 . 75) '(100 . 100)))))
|
'(80 . 80) '(100 . 100)))))
|
||||||
(global-set-key (kbd "C-c t") 'toggle-transparency)
|
(global-set-key (kbd "C-c t") 'toggle-transparency)
|
||||||
(set-frame-parameter (selected-frame) 'alpha '(75 . 75))
|
(set-frame-parameter (selected-frame) 'alpha '(80 . 80))
|
||||||
|
|
||||||
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
||||||
;;;; EMOJIFY ♌
|
;;;; EMOJIFY ♌
|
||||||
|
|||||||
@ -1,201 +0,0 @@
|
|||||||
;;; example-config.el -- Example Rational Emacs user customization file -*- lexical-binding: t; -*-
|
|
||||||
|
|
||||||
;;; Commentary:
|
|
||||||
;;
|
|
||||||
;; Rational Emacs supports user customization through a `config.el' file
|
|
||||||
;; similar to this one. You can copy this file as `config.el' to your
|
|
||||||
;; Rational Emacs configuration directory as an example.
|
|
||||||
;;
|
|
||||||
;; In your configuration you can set any Emacs configuration variable, face
|
|
||||||
;; attributes, themes, etc as you normally would.
|
|
||||||
;;
|
|
||||||
;; See the README.org file in this repository for additional information.
|
|
||||||
|
|
||||||
;;; Code:
|
|
||||||
(require 'rational-defaults)
|
|
||||||
(require 'rational-screencast)
|
|
||||||
(require 'rational-ui)
|
|
||||||
(require 'rational-editing)
|
|
||||||
(require 'rational-evil)
|
|
||||||
(require 'rational-completion)
|
|
||||||
(require 'rational-windows)
|
|
||||||
(require 'rational-use-package)
|
|
||||||
|
|
||||||
(setq system-time-locale "C")
|
|
||||||
(setenv "LANG" "en_US.UTF-8")
|
|
||||||
(setenv "LC_ALL" "en_US.UTF-8")
|
|
||||||
;; Set further font and theme customizations
|
|
||||||
(custom-set-variables
|
|
||||||
'(rational-ui-default-font
|
|
||||||
'(:font "Fira Code Retina" :weight light :height 110)))
|
|
||||||
|
|
||||||
(add-to-list 'default-frame-alist `(font . "Fira Code Retina"))
|
|
||||||
(set-face-attribute 'default nil :font "Fira Code Retina" :height 110)
|
|
||||||
(set-face-attribute 'fixed-pitch nil :font "Fira Code Retina" :height 110)
|
|
||||||
(set-face-attribute 'variable-pitch nil :font "Fira Code Retina" :height 110 :weight 'regular)
|
|
||||||
(set-fontset-font t 'hangul (font-spec :family "D2Coding" :height 110))
|
|
||||||
(setq face-font-rescale-alist
|
|
||||||
'(("D2Coding" . 1.25)))
|
|
||||||
|
|
||||||
|
|
||||||
(set-frame-parameter (selected-frame) 'fullscreen 'maximized)
|
|
||||||
(add-to-list 'default-frame-alist '(fullscreen . maximized))
|
|
||||||
|
|
||||||
(load-theme 'doom-dracula t)
|
|
||||||
|
|
||||||
(column-number-mode)
|
|
||||||
(global-display-line-numbers-mode t)
|
|
||||||
(global-hl-line-mode)
|
|
||||||
|
|
||||||
;;; example-config.el ends here
|
|
||||||
(setq user-full-name "JaeYoo-Im"
|
|
||||||
user-mail-address "cpu3792@gmail.com")
|
|
||||||
(defun toggle-transparency ()
|
|
||||||
(interactive)
|
|
||||||
(let ((alpha (frame-parameter nil 'alpha)))
|
|
||||||
(set-frame-parameter
|
|
||||||
nil 'alpha
|
|
||||||
(if (eql (cond ((numberp alpha) alpha)
|
|
||||||
((numberp (cdr alpha)) (cdr alpha))
|
|
||||||
;; Also handle undocumented (<active> <inactive>) form.
|
|
||||||
((numberp (cadr alpha)) (cadr alpha)))
|
|
||||||
100)
|
|
||||||
'(75 . 75) '(100 . 100)))))
|
|
||||||
(global-set-key (kbd "C-c t") 'toggle-transparency)
|
|
||||||
(set-frame-parameter (selected-frame) 'alpha '(75 . 75))
|
|
||||||
|
|
||||||
;; DASHBOARD
|
|
||||||
(straight-use-package 'dashboard)
|
|
||||||
(require 'all-the-icons)
|
|
||||||
(setq dashboard-set-heading-icons t)
|
|
||||||
(setq dashboard-set-file-icons t)
|
|
||||||
(setq dashboard-startup-banner 'logo)
|
|
||||||
(setq dashboard-center-content t)
|
|
||||||
(setq dashboard-week-agenda t)
|
|
||||||
(setq dashboard-agenda-time-string-format "%d/%m/%Y %A %H:%M")
|
|
||||||
(setq dashboard-items '((recents . 10)
|
|
||||||
(agenda . 5)
|
|
||||||
(bookmarks . 5)
|
|
||||||
(registers . 5)))
|
|
||||||
(setq dashboard-set-navigator t)
|
|
||||||
;; Format: "(icon title help action face prefix suffix)"
|
|
||||||
(setq dashboard-navigator-buttons
|
|
||||||
`((
|
|
||||||
(,(all-the-icons-octicon "mark-github" :height 1.1 :v-adjust 0.0)
|
|
||||||
"Github"
|
|
||||||
"Browse github"
|
|
||||||
(lambda (&rest _) (browse-url "https://github.com/JaeUs3792")))
|
|
||||||
(,(all-the-icons-octicon "book" :height 1.1 :v-adjust 0.0)
|
|
||||||
"My Blog"
|
|
||||||
"Browse Blog"
|
|
||||||
(lambda (&rest _) (browse-url "https://jaeus.net"))))))
|
|
||||||
(setq dashboard-set-footer nil)
|
|
||||||
(dashboard-setup-startup-hook)
|
|
||||||
|
|
||||||
|
|
||||||
;; EMOJI
|
|
||||||
(straight-use-package 'emojify)
|
|
||||||
(global-emojify-mode)
|
|
||||||
|
|
||||||
;; Which Key
|
|
||||||
(straight-use-package 'which-key)
|
|
||||||
(setq which-key-idle-delay 0.5)
|
|
||||||
(which-key-mode)
|
|
||||||
|
|
||||||
|
|
||||||
;; GENERAL KEY MAP
|
|
||||||
(straight-use-package 'general)
|
|
||||||
(general-evil-setup t)
|
|
||||||
(general-create-definer ju/leader-key-def
|
|
||||||
:keymaps '(normal insert visual emacs)
|
|
||||||
:prefix "SPC"
|
|
||||||
:global-prefix "C-SPC")
|
|
||||||
|
|
||||||
(ju/leader-key-def
|
|
||||||
"." 'find-file
|
|
||||||
;; Buffer
|
|
||||||
"b" '(:ignore t :which-key "buffer handling")
|
|
||||||
"b b" '(ibuffer :which-key "IBuffer")
|
|
||||||
"b k" '(kill-current-buffer :which-key "Kill current buffer")
|
|
||||||
"b n" '(next-buffer :which-key "Next buffer")
|
|
||||||
"b p" '(previous-buffer :which-key "Previous buffer")
|
|
||||||
"b B" '(ibuffer-list-buffers :which-key "IBuffer List Buffers")
|
|
||||||
"b K" '(kill-buffer :which-key "IBuffer Kill Buffers")
|
|
||||||
;; Eshell
|
|
||||||
"e" '(:ignore t :which-key "eshell")
|
|
||||||
"e h" '(counsel-esh-history :which "Kill history")
|
|
||||||
"e s" '(eshell :which "run eshell")
|
|
||||||
;; Workspace
|
|
||||||
;; Counsel
|
|
||||||
"f" '(:ignore t :which-key "file op.")
|
|
||||||
"f r" '(consult-recent-file :which-key "Recent files")
|
|
||||||
"f R" '(revert-buffer :which-key "Revert Buffer")
|
|
||||||
"t t" '(toggle-truncate-lines :which-key "Toggle truncate lines")
|
|
||||||
;; Shortcut
|
|
||||||
"f d d" '(lambda () (interactive) (find-file (expand-file-name "~/.emacs.rational.d/desktop.el")) :which-key "open exwm config")
|
|
||||||
"f d e" '(lambda () (interactive) (find-file (expand-file-name "~/.emacs.rational.d/config.el")) :which-key "open emacs config"))
|
|
||||||
|
|
||||||
|
|
||||||
(global-set-key (kbd "<escape>") 'keyboard-escape-quit)
|
|
||||||
(global-unset-key (kbd "C-j"))
|
|
||||||
(global-unset-key (kbd "C-k"))
|
|
||||||
(global-unset-key (kbd "S-SPC")) ;; use only S-\
|
|
||||||
|
|
||||||
|
|
||||||
;; tramp default is scp
|
|
||||||
(setq tramp-default-method "ssh")
|
|
||||||
|
|
||||||
(straight-use-package 'flycheck)
|
|
||||||
(global-flycheck-mode t)
|
|
||||||
|
|
||||||
|
|
||||||
;;(straight-use-package 'vertico-posframe)
|
|
||||||
;;(setq vertico-posframe-parameters
|
|
||||||
;; `((left-fringe . 8)
|
|
||||||
;; (right-fringe . 8) (alpha . 100)))
|
|
||||||
;;(vertico-posframe-mode 1)
|
|
||||||
|
|
||||||
|
|
||||||
;; TODO
|
|
||||||
(straight-use-package 'hl-todo)
|
|
||||||
(setq hl-todo-highlight-punctuation ":"
|
|
||||||
hl-todo-keyword-faces
|
|
||||||
`(;; For things that need to be done, just not today.
|
|
||||||
("TODO" warning bold)
|
|
||||||
;; For problems that will become bigger problems later if not
|
|
||||||
;; fixed ASAP.
|
|
||||||
("FIXME" error bold)
|
|
||||||
;; For tidbits that are unconventional and not intended uses of the
|
|
||||||
;; constituent parts, and may break in a future update.
|
|
||||||
("HACK" font-lock-constant-face bold)
|
|
||||||
;; For things that were done hastily and/or hasn't been thoroughly
|
|
||||||
;; tested. It may not even be necessary!
|
|
||||||
("REVIEW" font-lock-keyword-face bold)
|
|
||||||
;; For especially important gotchas with a given implementation,
|
|
||||||
;; directed at another user other than the author.
|
|
||||||
("NOTE" success bold)
|
|
||||||
;; For things that just gotta go and will soon be gone.
|
|
||||||
("DEPRECATED" font-lock-doc-face bold)
|
|
||||||
;; For a known bug that needs a workaround
|
|
||||||
("BUG" error bold)
|
|
||||||
;; For warning about a problematic or misguiding code
|
|
||||||
("XXX" font-lock-constant-face bold)))
|
|
||||||
(global-hl-todo-mode)
|
|
||||||
|
|
||||||
;; ORG Mode
|
|
||||||
(setq org-todo-keywords
|
|
||||||
'((sequence "TODO(t)" "HOLD(h)" "|" "KILL(k)" "DONE(d)")))
|
|
||||||
(setq org-ellipsis " ▾")
|
|
||||||
(setq org-hide-emphasis-markers t)
|
|
||||||
(setq org-src-fontify-natively t)
|
|
||||||
(setq org-fontify-quote-and-verse-blocks t)
|
|
||||||
|
|
||||||
(setq org-agenda-start-with-log-mode t)
|
|
||||||
(setq org-log-done 'time)
|
|
||||||
(setq org-log-into-drawer t)
|
|
||||||
(add-hook 'org-mode-hook (lambda () (org-indent-mode)))
|
|
||||||
|
|
||||||
;;(straight-use-package 'org-superstar)
|
|
||||||
;;(add-hook 'org-mode-hook (lambda () (org-superstar-mode 1)))
|
|
||||||
(straight-use-package 'org-attach-screenshot)
|
|
||||||
(straight-use-package 'org-download)
|
|
||||||
Reference in New Issue
Block a user