contrapunctus/dotemacs
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

Take out the trash

Browse Source
This commit is contained in:
Kashish Sharma 2015-11-20 04:18:35 +05:30
parent 4046c11f11
commit c174213d23
1 changed files with 26 additions and 7 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

33
init.el
View File

@ -1,10 +1,8 @@
(add-to-list 'load-path "~/.emacs.d/elisp/")
(add-to-list 'load-path "~/.emacs.d/elisp-git/color-moccur/")
(add-to-list 'load-path "~/.emacs.d/elisp-git/dired-toggle-sudo/")
(add-to-list 'load-path "~/.emacs.d/elisp-git/evil/")
(add-to-list 'load-path "~/.emacs.d/elisp-git/window-numbering/")
(add-to-list 'load-path "~/.emacs.d/elisp-git/evil-snipe/")
;(add-to-list 'load-path "~/.emacs.d/elisp-git/git-modes/")
(add-to-list 'load-path "~/.emacs.d/elisp-git/magit/lisp/")
(add-to-list 'load-path "~/.emacs.d/elisp-git/yafolding.el/")
(add-to-list 'load-path "~/.emacs.d/elisp-git/god-mode/")
@ -34,11 +32,21 @@
;;;; Linewrapping
(defun line-trunc-set ()
(visual-line-mode -1)
;(setq-default truncate-partial-width-windows t)
;(setq-default truncate-lines t))
(setq truncate-partial-width-windows t)
(setq truncate-lines t))
(visual-line-mode -1)
;(setq-default truncate-partial-width-windows t)
;(setq-default truncate-lines t))
(setq truncate-partial-width-windows t)
(setq truncate-lines t))
;; (defun line-trunc-set ()
;; (interactive)
;; (if (or truncate-lines
;; visual-line-mode)
;; (progn
;; (visual-line-mode -1)
;; (setq truncate-lines t))
;; (progn
;; (visual-line-mode 1)
;; (setq truncate-lines nil))))
;(add-hook 'text-mode-hook 'line-trunc-set)
(add-hook 'emacs-lisp-mode-hook 'line-trunc-set)
(add-hook 'org-mode-hook 'visual-line-mode)
@ -221,6 +229,7 @@
(global-set-key (kbd "C-x C-d") 'dired-jump)
(require 'dired)
(define-key dired-mode-map (kbd "b") 'dired-up-directory)
(add-hook 'dired-mode-hook 'visual-line-mode)
;(global-set-key (kbd "C-,") 'string-rectangle 'TAB)
(global-unset-key (kbd "C-x d"))
@ -441,6 +450,16 @@
(define-key org-mode-map (kbd "C-c C--") 'org-ctrl-c-minus)
(define-key org-mode-map (kbd "C-c C-,") 'org-metaleft)
(define-key org-mode-map (kbd "C-c C-.") 'org-metaright)
;; (define-key org-mode-map (kbd "C-j") 'org-return)
;; (define-key org-mode-map (kbd "C-m") 'org-return-indent)
;; (defun contrapunctus-org-expand-all ()
;; (interactive)
;; ;; todo - define inner recursive function
;; (beginning-of-buffer)
;; ;; todo - check if we are on a heading
;; (org-forward-heading-same-level)
;; ())
(require 'ace-jump-mode)