initial
This commit is contained in:
commit
77fa77466b
|
@ -0,0 +1,13 @@
|
|||
(defun copy-whole-line ()
|
||||
(interactive)
|
||||
(save-excursion
|
||||
(kill-new
|
||||
(buffer-substring
|
||||
(point-at-bol)
|
||||
(point-at-eol)))))
|
||||
(global-set-key (kbd "C-c w l") 'copy-whole-line)
|
||||
|
||||
(defun kill-all-buffers ()
|
||||
(interactive)
|
||||
(mapc 'kill-buffer (buffer-list)))
|
||||
(global-set-key (kbd "C-c k k") 'kill-all-buffers)
|
|
@ -0,0 +1,76 @@
|
|||
;; Packages
|
||||
(load "~/.emacs.d/packages.el")
|
||||
|
||||
;; Convenient functions
|
||||
(load "~/.emacs.d/functions.el")
|
||||
|
||||
;; Remove useless stuff
|
||||
(menu-bar-mode 0)
|
||||
(tool-bar-mode 0)
|
||||
(scroll-bar-mode 0)
|
||||
|
||||
;; Appearance
|
||||
(set-default-font "ttyp0 12")
|
||||
; theme set in packages.el
|
||||
(global-linum-mode)
|
||||
(blink-cursor-mode nil)
|
||||
(when window-system (global-hl-line-mode t))
|
||||
(show-paren-mode t)
|
||||
|
||||
;; Mode line
|
||||
(line-number-mode t)
|
||||
(column-number-mode t)
|
||||
(setq display-time-24hr-format t)
|
||||
(display-time-mode t)
|
||||
|
||||
;; Instead of leaving backup files everywhere, have them in this dir
|
||||
(setq backup-directory-alist `(("." . "~/.emacs.d/backups")))
|
||||
|
||||
;; Y or N instead of Yes or No
|
||||
(defalias 'yes-or-no-p 'y-or-n-p)
|
||||
|
||||
;; Smaller skips when cursor reaches end of screen
|
||||
(setq scroll-conservatively 100)
|
||||
|
||||
;; Disable bell
|
||||
(setq ring-bell-function 'ignore)
|
||||
|
||||
;; Subword for camelCase words
|
||||
(global-subword-mode t)
|
||||
|
||||
;; Electric pair mode
|
||||
(setq electric-pair-pairs '((?\( . ?\))
|
||||
(?\[ . ?\])
|
||||
(?\{ . ?\})
|
||||
(?\" . ?\")
|
||||
))
|
||||
(electric-pair-mode t)
|
||||
|
||||
;; windmove
|
||||
(global-set-key (kbd "C-:") 'windmove-left)
|
||||
(global-set-key (kbd "C-|") 'windmove-right)
|
||||
(global-set-key (kbd "C-{") 'windmove-up)
|
||||
(global-set-key (kbd "C-\"") 'windmove-down)
|
||||
|
||||
;; Terminal
|
||||
(defvar term-shell "/bin/zsh")
|
||||
(defadvice ansi-term (before force-bash)
|
||||
(interactive (list term-shell)))
|
||||
(ad-activate 'ansi-term)
|
||||
|
||||
|
||||
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
||||
|
||||
(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.
|
||||
'(package-selected-packages (quote (almost-mono-themes use-package))))
|
||||
(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.
|
||||
)
|
||||
;;
|
|
@ -0,0 +1,17 @@
|
|||
(setq gnutls-algorithm-priority "NORMAL:-VERS-TLS1.3")
|
||||
|
||||
;; Package
|
||||
(require 'package)
|
||||
(setq package-archives '(("gnu" . "http://mirrors.163.com/elpa/gnu/")
|
||||
("melpa" . "https://melpa.org/packages/")))
|
||||
(package-initialize)
|
||||
|
||||
;; use-package
|
||||
(unless (package-installed-p 'use-package)
|
||||
(package-refresh-contents)
|
||||
(package-install 'use-package))
|
||||
|
||||
(use-package almost-mono-themes
|
||||
:ensure t
|
||||
:init
|
||||
(load-theme 'almost-mono-black t))
|
Loading…
Reference in New Issue