;; [Emacsモダン化計画 -かわEmacs編-](https://qiita.com/Ladicle/items/feb5f9dce9adf89652cf)
;; ミニバッファの履歴を自動的に保存 (savehist-mode 1) ;;; 永続化する変数を新たに追加する (push ‘compile-command savehist-additional-variables) ;;; 永続化しないミニバッファ履歴の変数を追加する (push ‘command-history savehist-ignored-variables)
;; BeepをOFF && 画面フラッシュ (setq visible-bell t) ;; カーソルの点滅 (blink-cursor-mode t)
(require ‘package) (add-to-list ‘package-archives ‘(“melpa” . “https://melpa.org/packages/“) t) ;; Comment/uncomment this line to enable MELPA Stable if desired. See `package-archive-priorities` ;; and `package-pinned-packages`. Most users will not need or want to do this. ;;(add-to-list ‘package-archives ‘(“melpa-stable” . “https://stable.melpa.org/packages/“) t) ;;(add-to-list ‘package-archives ‘(“org” . “http://orgmode.org/elpa/“) t) ;;(add-to-list ‘package-archives ‘(“ELPA” . “http://tromey.com/elpa/“) t) (package-initialize)
(use-package doom-themes :custom (doom-themes-enable-italic t) (doom-themes-enable-bold t) :custom-face (doom-modeline-bar ((t (:background “#6272a4”)))) :config (load-theme ‘doom-dracula t) (doom-themes-neotree-config) (doom-themes-org-config))
(use-package doom-modeline :custom (doom-modeline-buffer-file-name-style ‘truncate-with-project) (doom-modeline-icon t) (doom-modeline-major-mode-icon nil) (doom-modeline-minor-modes nil) :hook (after-init . doom-modeline-mode) :config (line-number-mode 0) (column-number-mode 0) )
(use-package hide-mode-line :hook ((neotree-mode imenu-list-minor-mode minimap-mode) . hide-mode-line-mode))
(use-package dashboard :diminish (dashboard-mode page-break-lines-mode) :custom (dashboard-startup-banner ‘logo) (dashboard-items ‘((recents . 15) ;;(projects . 5) ;;(bookmarks . 5) (agenda . 5))) :hook (after-init . dashboard-setup-startup-hook) :config (add-to-list ‘dashboard-items ‘(agenda) t) )
;; OS によって設定が異なる場合はここでセットする (when (eq system-type ‘windows-nt) ;; for Windows (load-file “~/.emacs.d/local/init_windows.el”))
(when (eq system-type ‘darwin) ; Mac OS X ;; ←Mac用設定を、ここに記述 ;;(setq init_host (concat “~/.emacs.d/local/init_darwin” “.el”)) (load-file “~/.emacs.d/local/init_darwin.el”))
;;; tab-bar-mode ;;; ;; のキーバインドを設定 (defvar my-tab-bar-prefix (kbd “C-t”)) (setq my-tab-bar-map (make-keymap)) (define-key global-map my-tab-bar-prefix my-tab-bar-map) (defun my-set-key-c-z-map () (local-set-key my-tab-bar-prefix my-tab-bar-map)) (define-key my-tab-bar-map “c” ‘tab-new) (define-key my-tab-bar-map (kbd “C-c”) ‘tab-new) (define-key my-tab-bar-map “n” ‘tab-next) (define-key my-tab-bar-map (kbd “C-n”) ‘tab-next) (define-key my-tab-bar-map “p” ‘tab-previous) (define-key my-tab-bar-map (kbd “C-p”) ‘tab-previous) (define-key my-tab-bar-map (kbd “C-z”) ‘iconify-or-deiconify-frame) (define-key my-tab-bar-map (kbd “C-k”) ‘tab-close)
;;(load-theme ‘tango t)
;; BeepをOFF && 画面フラッシュ (setq visible-bell t) ;; カーソルの点滅 ;;(blink-cursor-mode t) ;; カーソル移動時の強調表示 (beacon-mode t)
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;; text-size ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; (global-set-key (kbd “M-S-<down>”) ‘text-scale-decrease) (global-set-key (kbd “M-S-<up>”) ‘text-scale-increase)
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;; Google Translate ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;(require ‘google-translate) (require ‘google-translate-default-ui) ;;(require ‘google-translate-smooth-ui) ;;(global-set-key “\C-ct” ‘google-translate-smooth-translate) (global-set-key “\C-ct” ‘google-translate-at-point) (global-set-key “\C-cr” ‘google-translate-at-point-reverse) (global-set-key “\C-cT” ‘google-translate-query-translate)
;; nyan-mode (nyan-mode t) (setq nyan-animate-nyancat t)
;; Org-Mode (add-to-list ‘auto-mode-alist ‘(“\\.org\\'” . org-mode)) (global-set-key “\C-cl” ‘org-store-link) (global-set-key “\C-cc” ‘org-capture) (global-set-key “\C-ca” ‘org-agenda) (global-set-key “\C-cb” ‘org-iswitchb)
(setq org2blog/wp-blog-alist ‘((“nosubject” :url “https://nosubject.io/xmlrpc.php” :username “usura”)))
(custom-set-variables ;; custom-set-variables was added by Custom. ;; If you edit it by hand, you could mess it up, so be careful. ;; Your init file should contain only one such instance. ;; If there is more than one, they won’t work right. ‘(column-number-mode t) ‘(custom-safe-themes ‘(“8c7e832be864674c220f9a9361c851917a93f921fedb7717b1b5ece47690c098” default)) ‘(global-display-line-numbers-mode t) ‘(google-translate-default-source-language “en”) ‘(google-translate-default-target-language “ja”) ‘(google-translate-output-destination ‘popup) ‘(google-translate-translation-to-kill-ring t) ‘(howm-directory “c:/Users/kkitta/OneDrive – kitta/MyDrive/emacs-howm”) ‘(howm-menu-file “howm-menu.txt”) ‘(howm-menu-footer nil) ‘(howm-menu-name-format ” howmM:%s“) ‘(howm-menu-recent-num 30) ‘(howm-menu-schedule-days 30) ‘(howm-menu-schedule-days-before 30) ‘(howm-menu-todo-num 30) ‘(howm-reminder-menu-types ‘(“-” “” “!”)) ‘(howm-reminder-types ‘(“-” “” “!”) t) ‘(howm-schedule-menu-types ‘(“” “.” “”)) ‘(howm-todo-menu-types ‘(“” “-” “” “~” “!” “”)) ‘(howm-todo-types ‘(“-” “” “~” “!” “.”)) ‘(inhibit-startup-screen t) ‘(initial-scratch-message nil) ‘(linum-mode 1 t) ‘(menu-bar-mode nil) ‘(package-selected-packages ‘(org2blog all-the-icons dashboard hide-mode-line doom-modeline doom-themes tr-ime nyan-mode mew markdown-mode json-mode init-loader ht howm google-translate dockerfile-mode docker-compose-mode beacon)) ‘(scroll-bar-mode nil) ‘(size-indication-mode t) ‘(tool-bar-mode nil) ‘(tooltip-mode nil)) ;;(custom-set-faces ;; custom-set-faces was added by Custom. ;; If you edit it by hand, you could mess it up, so be careful. ;; Your init file should contain only one such instance. ;; If there is more than one, they won’t work right. ;; ‘(default ((t (:family “Cascadia Code” :foundry “outline” :slant normal :weight regular :height 162 :width normal))))) (custom-set-faces ;; custom-set-faces was added by Custom. ;; If you edit it by hand, you could mess it up, so be careful. ;; Your init file should contain only one such instance. ;; If there is more than one, they won’t work right. )
;;(profiler-report) ;;(profiler-stop)
;;(load-theme ‘wheatgrass t)