update
This commit is contained in:
parent
b8c06cc7e4
commit
bf66520d06
1 changed files with 21 additions and 10 deletions
31
config.org
31
config.org
|
@ -116,6 +116,9 @@ it. I don't think i'd ever use the overwritten.
|
||||||
:defer 1)
|
:defer 1)
|
||||||
#+END_SRC
|
#+END_SRC
|
||||||
* My functions
|
* My functions
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
Functions I wrote because emacs lisp is cool and useful.
|
Functions I wrote because emacs lisp is cool and useful.
|
||||||
#+begin_src emacs-lisp
|
#+begin_src emacs-lisp
|
||||||
(defun sosa/goto-previous-buffer ()
|
(defun sosa/goto-previous-buffer ()
|
||||||
|
@ -200,6 +203,7 @@ Sane defaults!!!
|
||||||
#+BEGIN_SRC emacs-lisp
|
#+BEGIN_SRC emacs-lisp
|
||||||
(tool-bar-mode -1)
|
(tool-bar-mode -1)
|
||||||
(menu-bar-mode -1)
|
(menu-bar-mode -1)
|
||||||
|
|
||||||
(scroll-bar-mode -1)
|
(scroll-bar-mode -1)
|
||||||
(global-hl-line-mode)
|
(global-hl-line-mode)
|
||||||
(set-face-background hl-line-face "#434343")
|
(set-face-background hl-line-face "#434343")
|
||||||
|
@ -212,6 +216,9 @@ Sane defaults!!!
|
||||||
(set-face-background 'line-number nil)
|
(set-face-background 'line-number nil)
|
||||||
(set-face-background 'line-number-current-line nil)
|
(set-face-background 'line-number-current-line nil)
|
||||||
(setq-default Man-notify-method 'pushy)
|
(setq-default Man-notify-method 'pushy)
|
||||||
|
;; BSD specific options
|
||||||
|
(cond ((eq system-type 'berkeley-unix)
|
||||||
|
(setq insert-directory-program "/usr/local/bin/gls")))
|
||||||
#+END_SRC
|
#+END_SRC
|
||||||
** Highlight matching parentheses
|
** Highlight matching parentheses
|
||||||
Useful for programming in lisp. I don't program in Lisp, but well.
|
Useful for programming in lisp. I don't program in Lisp, but well.
|
||||||
|
@ -274,8 +281,9 @@ And to have multiple buffers
|
||||||
#+begin_src emacs-lisp
|
#+begin_src emacs-lisp
|
||||||
(use-package plan9-theme
|
(use-package plan9-theme
|
||||||
:ensure t
|
:ensure t
|
||||||
:init(load-theme 'plan9 t))
|
:init(load-theme 'wombat t))
|
||||||
(set-cursor-color "purple")
|
(set-cursor-color "purple")
|
||||||
|
#+end_src
|
||||||
** ctrlf
|
** ctrlf
|
||||||
So, you know, C-s in emacs sucks, so this is a repleacement for that.
|
So, you know, C-s in emacs sucks, so this is a repleacement for that.
|
||||||
#+BEGIN_SRC emacs-lisp
|
#+BEGIN_SRC emacs-lisp
|
||||||
|
@ -385,6 +393,8 @@ to fallback to hunspell. which does the same.
|
||||||
Ahhh, the emacs file browser, better than ranger and others...
|
Ahhh, the emacs file browser, better than ranger and others...
|
||||||
Hide dotfiles:
|
Hide dotfiles:
|
||||||
#+BEGIN_SRC emacs-lisp
|
#+BEGIN_SRC emacs-lisp
|
||||||
|
(use-package dired-icon
|
||||||
|
:ensure t)
|
||||||
|
|
||||||
(use-package dired-hide-dotfiles
|
(use-package dired-hide-dotfiles
|
||||||
:ensure t
|
:ensure t
|
||||||
|
@ -393,7 +403,7 @@ Hide dotfiles:
|
||||||
"My `dired' mode hook."
|
"My `dired' mode hook."
|
||||||
;; To hide dot-files by default
|
;; To hide dot-files by default
|
||||||
(dired-hide-dotfiles-mode)
|
(dired-hide-dotfiles-mode)
|
||||||
|
(dired-icon-mode)
|
||||||
;; To toggle hiding
|
;; To toggle hiding
|
||||||
(define-key dired-mode-map "." #'dired-hide-dotfiles-mode))
|
(define-key dired-mode-map "." #'dired-hide-dotfiles-mode))
|
||||||
|
|
||||||
|
@ -404,6 +414,7 @@ Hide dotfiles:
|
||||||
(add-hook 'dired-mode-hook
|
(add-hook 'dired-mode-hook
|
||||||
(lambda ()
|
(lambda ()
|
||||||
(dired-hide-details-mode)))
|
(dired-hide-details-mode)))
|
||||||
|
|
||||||
#+END_SRC
|
#+END_SRC
|
||||||
Now let's make the thing lysergic
|
Now let's make the thing lysergic
|
||||||
#+begin_src emacs-lisp
|
#+begin_src emacs-lisp
|
||||||
|
@ -414,7 +425,7 @@ Now let's make the thing lysergic
|
||||||
#+end_src
|
#+end_src
|
||||||
Good sorting
|
Good sorting
|
||||||
#+begin_src emacs-lisp
|
#+begin_src emacs-lisp
|
||||||
(setq dired-listing-switches "-aBhl --group-directories-first")
|
(setq dired-listing-switches "-aBhl --group-directories-first")
|
||||||
#+end_src
|
#+end_src
|
||||||
** kill ring popup
|
** kill ring popup
|
||||||
#+BEGIN_SRC emacs-lisp
|
#+BEGIN_SRC emacs-lisp
|
||||||
|
@ -585,9 +596,9 @@ written in Perl.
|
||||||
** whitespace-cleanup-mode
|
** whitespace-cleanup-mode
|
||||||
Useful for makefiles.
|
Useful for makefiles.
|
||||||
#+begin_src emacs-lisp
|
#+begin_src emacs-lisp
|
||||||
(use-package whitespace-cleanup-mode
|
(use-package whitespace-cleanup-mode
|
||||||
:ensure t
|
:ensure t
|
||||||
:init(add-hook 'after-init-hook 'whitespace-cleanup-mode))
|
:init(add-hook 'after-init-hook 'whitespace-cleanup-mode))
|
||||||
#+end_src
|
#+end_src
|
||||||
** Nyancat
|
** Nyancat
|
||||||
Yes.
|
Yes.
|
||||||
|
@ -601,10 +612,10 @@ Yes.
|
||||||
** Orderless
|
** Orderless
|
||||||
#+begin_src emacs-lisp
|
#+begin_src emacs-lisp
|
||||||
(use-package orderless
|
(use-package orderless
|
||||||
:ensure t
|
:ensure t
|
||||||
:custom
|
:custom
|
||||||
(completion-styles '(orderless basic))
|
(completion-styles '(orderless basic))
|
||||||
(completion-category-overrides '((file (styles basic partial-completion)))))
|
(completion-category-overrides '((file (styles basic partial-completion)))))
|
||||||
#+end_src
|
#+end_src
|
||||||
** web-mode
|
** web-mode
|
||||||
#+begin_src emacs-lisp
|
#+begin_src emacs-lisp
|
||||||
|
|
Loading…
Add table
Reference in a new issue