aboutsummaryrefslogtreecommitdiffstats
path: root/lisp
diff options
context:
space:
mode:
authorJesús <heckyel@hyperbola.info>2019-01-22 15:45:41 -0500
committerJesús <heckyel@hyperbola.info>2019-01-22 15:45:41 -0500
commitced0fe8f9ef7cd16ade900bb34393c627f6d0c69 (patch)
tree350d3a0cbb87b12a36c0dc12537c56a75a2668ae /lisp
parentd0f44d85466d7211d54e30970f29815842ff4180 (diff)
downloademacs-personal-ced0fe8f9ef7cd16ade900bb34393c627f6d0c69.tar.lz
emacs-personal-ced0fe8f9ef7cd16ade900bb34393c627f6d0c69.tar.xz
emacs-personal-ced0fe8f9ef7cd16ade900bb34393c627f6d0c69.zip
Change directory lisp/ to modules/
FS #2
Diffstat (limited to 'lisp')
-rw-r--r--lisp/init-ccc.el25
-rw-r--r--lisp/init-crystal.el7
-rw-r--r--lisp/init-diminish.el9
-rw-r--r--lisp/init-dokuwiki.el4
-rw-r--r--lisp/init-ecb.el19
-rw-r--r--lisp/init-editing-utils.el57
-rw-r--r--lisp/init-editorconfig.el8
-rw-r--r--lisp/init-elpa.el33
-rw-r--r--lisp/init-emmet-mode.el10
-rw-r--r--lisp/init-flycheck.el26
-rw-r--r--lisp/init-git.el97
-rw-r--r--lisp/init-gui.el68
-rw-r--r--lisp/init-html.el13
-rw-r--r--lisp/init-icons.el17
-rw-r--r--lisp/init-indent-guides.el9
-rw-r--r--lisp/init-less.el7
-rw-r--r--lisp/init-markdown.el33
-rw-r--r--lisp/init-modeline.el46
-rw-r--r--lisp/init-neotree.el90
-rw-r--r--lisp/init-nginx.el7
-rw-r--r--lisp/init-nlinum.el76
-rw-r--r--lisp/init-php.el29
-rw-r--r--lisp/init-pkgbuild.el4
-rw-r--r--lisp/init-python.el32
-rw-r--r--lisp/init-rainbow.el11
-rw-r--r--lisp/init-ready.el13
-rw-r--r--lisp/init-sass.el7
-rw-r--r--lisp/init-scss.el7
-rw-r--r--lisp/init-security.el12
-rw-r--r--lisp/init-theme.el10
-rw-r--r--lisp/init-utils.el24
-rw-r--r--lisp/init-web-mode.el14
-rw-r--r--lisp/init-whitespace.el6
-rw-r--r--lisp/init-yaml.el5
-rw-r--r--lisp/lib/myemacs.el18
-rw-r--r--lisp/lib/sachachua.el39
36 files changed, 0 insertions, 892 deletions
diff --git a/lisp/init-ccc.el b/lisp/init-ccc.el
deleted file mode 100644
index 6733f3e..0000000
--- a/lisp/init-ccc.el
+++ /dev/null
@@ -1,25 +0,0 @@
-;;; init-ccc.el --- .Emacs Configuration -*- lexical-binding: t -*-
-;;; Commentary:
-;;
-
-;;; Code:
-
-;;----------------------------------------------------------------------------
-;; c++ Mode
-;;----------------------------------------------------------------------------
-(add-hook 'c++-mode-hook
- (lambda ()
- (setq indent-tabs-mode t)
- (setq c-basic-offset 4)
- (setq tab-width 4)))
-
-;; This is my default indent.
-;; After moving the cursor to line 2 I see that the relevant symbol is comment-intro.
-(c-set-offset 'comment-intro 6)
-
-(provide 'init-ccc)
-
-;; Local Variables:
-;; byte-compile-warnings: (not free-vars)
-;; End:
-;;; init-ccc.el ends here
diff --git a/lisp/init-crystal.el b/lisp/init-crystal.el
deleted file mode 100644
index a62061b..0000000
--- a/lisp/init-crystal.el
+++ /dev/null
@@ -1,7 +0,0 @@
-;;----------------------------------------------------------------------------
-;; Crystal Mode
-;;----------------------------------------------------------------------------
-(use-package crystal-mode
- :mode ("\\.cr\\'" . crystal-mode))
-
-(provide 'init-crystal)
diff --git a/lisp/init-diminish.el b/lisp/init-diminish.el
deleted file mode 100644
index 3187103..0000000
--- a/lisp/init-diminish.el
+++ /dev/null
@@ -1,9 +0,0 @@
-;;----------------------------------------------------------------------------
-;; Diminish - is minor modes with no modeline display
-;;----------------------------------------------------------------------------
-(use-package diminish)
-
-;; Hide undo-tree-mode
-(diminish 'undo-tree-mode)
-
-(provide 'init-diminish)
diff --git a/lisp/init-dokuwiki.el b/lisp/init-dokuwiki.el
deleted file mode 100644
index 011c5bb..0000000
--- a/lisp/init-dokuwiki.el
+++ /dev/null
@@ -1,4 +0,0 @@
-;; dokuwiki-mode
-(use-package dokuwiki-mode)
-
-(provide 'init-dokuwiki)
diff --git a/lisp/init-ecb.el b/lisp/init-ecb.el
deleted file mode 100644
index 83e1286..0000000
--- a/lisp/init-ecb.el
+++ /dev/null
@@ -1,19 +0,0 @@
-;;----------------------------------------------------------------------------
-;; ECB
-;;----------------------------------------------------------------------------
-(use-package ecb
- :config
- (custom-set-variables '(ecb-options-version "2.50"))
- (setq-default ecb-tip-of-the-day nil)
- (setq ecb-examples-bufferinfo-buffer-name nil)
-
- (defun ecb-toggle ()
- (interactive)
- (if ecb-minor-mode
- (ecb-deactivate)
- (ecb-activate)))
- (global-set-key [f2] 'ecb-toggle)
-
- )
-
-(provide 'init-ecb)
diff --git a/lisp/init-editing-utils.el b/lisp/init-editing-utils.el
deleted file mode 100644
index 292fa1d..0000000
--- a/lisp/init-editing-utils.el
+++ /dev/null
@@ -1,57 +0,0 @@
-;;----------------------------------------------------------------------------
-;; Remove whitespaces
-;;----------------------------------------------------------------------------
-;; Delete trailing whitespace before saving fil → all modes
-;; (add-hook 'before-save-hook 'delete-trailing-whitespace)
-
-;; Delete-trailing-whitespace-when-saving-except-certain-modes
-(add-hook 'before-save-hook
- (lambda ()
- (unless (eq major-mode 'diff-mode)
- (delete-trailing-whitespace))))
-;;----------------------------------------------------------------------------
-;; Automatic pairs open symbols (, {, [...
-;; Disable for default.
-;; Uncomment the next 4 lines if you want to enable the pairs-mode
-;;(when (fboundp 'electric-pair-mode)
-;; (electric-pair-mode))
-;;(when (eval-when-compile (version< "24.4" emacs-version))
-;; (electric-indent-mode 1))
-
-;; Active auto-revert-mode that automatically reloads modified files out of Emacs.
-;; It is very useful to see logs (like auto-revert-tail-mode) among many other cases.
-(global-auto-revert-mode)
-(setq global-auto-revert-non-file-buffers t
- auto-revert-verbose nil)
-
-;;----------------------------------------------------------------------------
-;; Show matching parens
-;;----------------------------------------------------------------------------
-(show-paren-mode 1)
-
-;;----------------------------------------------------------------------------
-;; More useful things - only one line
-;;----------------------------------------------------------------------------
-(set-default 'truncate-lines t)
-(setq show-trailing-whitespace nil)
-
-;;----------------------------------------------------------------------------
-;; Some basic preferences
-;;----------------------------------------------------------------------------
-(setq-default
- indent-tabs-mode nil)
-
-;;----------------------------------------------------------------------------
-;; Undo-tree
-;;----------------------------------------------------------------------------
-(use-package undo-tree
- :diminish undo-tree-mode
- :config
- (progn
- (global-undo-tree-mode)
- (setq undo-tree-visualizer-timestamps nil)
- (setq undo-tree-visualizer-diff nil)))
-
-;;----------------------------------------------------------------------------
-(myemacs/elapsed-time)
-(provide 'init-editing-utils)
diff --git a/lisp/init-editorconfig.el b/lisp/init-editorconfig.el
deleted file mode 100644
index b2eed4f..0000000
--- a/lisp/init-editorconfig.el
+++ /dev/null
@@ -1,8 +0,0 @@
-;;----------------------------------------------------------------------------
-;; EditorConfig
-;;----------------------------------------------------------------------------
-(use-package editorconfig)
-
-(editorconfig-mode 1)
-
-(provide 'init-editorconfig)
diff --git a/lisp/init-elpa.el b/lisp/init-elpa.el
deleted file mode 100644
index e5a6a3d..0000000
--- a/lisp/init-elpa.el
+++ /dev/null
@@ -1,33 +0,0 @@
-;;; Find and load the correct package.el
-;; =====================================================
-;; use-package → https://github.com/jwiegley/use-package
-;; =====================================================
-(require 'package)
-
-;; Repositories
-;; ================
-(setq package-archives
- '(("melpa" . "https://melpa.org/packages/")
- ;;("melpa-stable" . "https://stable.melpa.org/packages/")
- ("gnu" . "https://elpa.gnu.org/packages/")
- ("org" . "https://orgmode.org/elpa/")))
-
-(setq package-archive-priorities
- '(("melpa" . 4)
- ("melpa-stable" . 0)
- ("gnu" . 1)
- ("org" . 3)))
-;; =================
-(package-initialize)
-
-(unless (package-installed-p 'use-package)
- (package-refresh-contents)
- (package-install 'use-package))
-
-(require 'use-package)
-(setq use-package-always-ensure t)
-;; =====================================================
-;; End use-package
-;; =====================================================
-
-(provide 'init-elpa)
diff --git a/lisp/init-emmet-mode.el b/lisp/init-emmet-mode.el
deleted file mode 100644
index e0a49f8..0000000
--- a/lisp/init-emmet-mode.el
+++ /dev/null
@@ -1,10 +0,0 @@
-;; emmet-mode
-(use-package emmet-mode
- ;; Enable for only languages
- :init
- (add-hook 'sgml-mode-hook 'emmet-mode) ;; Auto-start on any markup modes
- (add-hook 'web-mode-hook 'emmet-mode) ;; enable Emmet on web-mode
- (add-hook 'css-mode-hook 'emmet-mode) ;; enable Emmet's css abbreviation.
-)
-
-(provide 'init-emmet-mode)
diff --git a/lisp/init-flycheck.el b/lisp/init-flycheck.el
deleted file mode 100644
index aa513c5..0000000
--- a/lisp/init-flycheck.el
+++ /dev/null
@@ -1,26 +0,0 @@
-(use-package flycheck
- ;; Enable for only languages
- :init
- ;; (add-hook 'after-init-hook 'global-flycheck-mode)
- (add-hook 'c++-mode-hook 'flycheck-mode)
- ;; (add-hook 'emacs-lisp-mode-hook 'flycheck-mode)
- (add-hook 'html-mode-hook 'flycheck-mode)
- (add-hook 'js-mode-hook 'flycheck-mode)
- (add-hook 'web-mode-hook 'flycheck-mode)
- (add-hook 'sh-mode-hook 'flycheck-mode)
- :config
- ;; support web-mode with PHP
- (flycheck-define-checker mix-php
- "A PHP syntax checker using the PHP command line interpreter.
- See URL `https://php.net/manual/en/features.commandline.php'."
- :command ("php" "-l" "-d" "error_reporting=E_ALL" "-d" "display_errors=1"
- "-d" "log_errors=0" source)
- :error-patterns
- ((error line-start (or "Parse" "Fatal" "syntax") " error" (any ":" ",") " "
- (message) " in " (file-name) " on line " line line-end))
- :modes (php-mode php+-mode web-mode))
-
- (add-to-list 'flycheck-checkers 'mix-php)
- )
-
-(provide 'init-flycheck)
diff --git a/lisp/init-git.el b/lisp/init-git.el
deleted file mode 100644
index ef7acc1..0000000
--- a/lisp/init-git.el
+++ /dev/null
@@ -1,97 +0,0 @@
-;;; init-git.el --- .Emacs Configuration -*- lexical-binding: t -*-
-;;; Commentary:
-;;
-
-;;; Code:
-(setq vc-follows-symlinks t
- find-file-visit-truename t
- vc-handled-backends nil)
-
-(if (display-graphic-p)
- (use-package git-gutter-fringe
- :ensure t
- :config
- (global-git-gutter-mode t)
- (setq-default fringes-outside-margins t)
- (setq-default left-fringe-width 10)
- (setq indicate-empty-lines nil)
- (set-face-foreground 'git-gutter-fr:modified "purple")
- (set-face-foreground 'git-gutter-fr:added "green")
- (set-face-foreground 'git-gutter-fr:deleted "red")
-
- (defun my-reshape-git-gutter (gutter)
- "Re-shape gutter for `ivy-read'."
- (let* ((linenum-start (aref gutter 3))
- (linenum-end (aref gutter 4))
- (target-line "")
- (target-linenum 1)
- (tmp-line "")
- (max-line-length 0))
- (save-excursion
- (while (<= linenum-start linenum-end)
- (goto-line linenum-start)
- (setq tmp-line (replace-regexp-in-string "^[ \t]*" ""
- (buffer-substring (line-beginning-position)
- (line-end-position))))
- (when (> (length tmp-line) max-line-length)
- (setq target-linenum linenum-start)
- (setq target-line tmp-line)
- (setq max-line-length (length tmp-line)))
-
- (setq linenum-start (1+ linenum-start))))
- ;; build (key . linenum-start)
- (cons (format "%s %d: %s"
- (if (eq 'deleted (aref gutter 1)) "-" "+")
- target-linenum target-line)
- target-linenum)))
-
- (defun my-goto-git-gutter ()
- (interactive)
- (if git-gutter-fr:diffinfos
- (ivy-read "git-gutters-fr:"
- (mapcar 'my-reshape-git-gutter git-gutter-fr:diffinfos)
- :action (lambda (e)
- ;; ivy9+ keep `(car e)'
- ;; ivy8- strip the `(car e)'
- ;; we handle both data structure
- (unless (numberp e) (setq e (cdr e)))
- (goto-line e)))
- (message "NO git-gutters-fringe!")))))
-
-(use-package gitconfig-mode
- :ensure t
- :mode ("/\\.?git/?config$"
- "/\\.gitmodules$")
- :init (add-hook 'gitconfig-mode-hook 'flyspell-mode))
-
-(use-package gitignore-mode
- :ensure t
- :mode ("/\\.gitignore$"
- "/\\.git/info/exclude$"
- "/git/ignore$"))
-
-(use-package gitattributes-mode
- :ensure t
- :defer t)
-
-(use-package git-timemachine
- :ensure t
- :commands git-timemachine
- :bind (:map git-timemachine-mode
- ("c" . git-timemachine-show-current-revision)
- ("b" . git-timemachine-switch-branch)))
-
-;;; smerge-mode video explain https://emacsgifs.github.io/public/videos/758861381898637313.mp4
-(use-package smerge-mode
- :ensure t
- :config
- (defun enable-smerge-maybe ()
- (when (and buffer-file-name (vc-backend buffer-file-name))
- (save-excursion
- (goto-char (point-min))
- (when (re-search-forward "^<<<<<<< " nil t)
- (smerge-mode +1)))))
- (add-hook 'buffer-list-update-hook #'enable-smerge-maybe))
-
-(provide 'init-git)
-;;; init-git.el ends here
diff --git a/lisp/init-gui.el b/lisp/init-gui.el
deleted file mode 100644
index 9bd32a5..0000000
--- a/lisp/init-gui.el
+++ /dev/null
@@ -1,68 +0,0 @@
-;;; init-gui.el --- .Emacs Configuration -*- lexical-binding: t -*-
-;;; Commentary:
-;;
-
-;;; Code:
-;;-----------------------
-;; Remove some GUI stuff
-;;-----------------------
-(setq use-file-dialog nil)
-(setq use-dialog-box nil)
-(setq inhibit-startup-screen t)
-(setq inhibit-startup-echo-area-message t)
-(tool-bar-mode 0)
-(set-scroll-bar-mode nil)
-(menu-bar-mode 0)
-(setq make-backup-files nil) ; stop creating backup~ files
-(setq auto-save-default nil) ; stop creating #autosave# files
-
-;;----------------------------------------------------------------------------
-;; Editor configuration
-;;----------------------------------------------------------------------------
-(setq indicate-empty-lines t)
-
-(let ((no-border '(internal-border-width . 0)))
- (add-to-list 'default-frame-alist no-border)
- (add-to-list 'initial-frame-alist no-border))
-
-(setq frame-title-format
- '((:eval (if (buffer-file-name)
- (abbreviate-file-name (buffer-file-name))
- "%b"))))
-;; Non-zero values for `line-spacing' can mess up ansi-term and co,
-;; so we zero it explicitly in those cases.
-(add-hook 'term-mode-hook
- (lambda ()
- (setq line-spacing 0)))
-
-;; Font theme (Monospace, or DejaVu Sans Mono if Monospace is not
-;; present)
-(condition-case nil
- (set-frame-font "Hack-9")
- ;; (set-frame-font "Monospace-9")
- ;; (set-frame-font "Anonymous Pro-10")
- (error (set-frame-font "DejaVu Sans Mono-10")))
-
-;;----------------------------------------------------------------------------
-;; Configure keys
-;;----------------------------------------------------------------------------
-(global-unset-key (kbd "C-z")) ; Stops C-z from minimizing window
-(global-set-key (kbd "M-0") (lambda () (interactive) (modify-frame-parameters nil '((alpha . 100))))) ; M-0 standard visibility
-(global-set-key (kbd "<f11>") 'myemacs/toggle-fullscreen) ; F11 FullScreen
-(global-set-key (kbd "s-C-+") 'sacha/increase-font-size) ; C-+ increase font size
-(global-set-key (kbd "s-C--") 'sacha/decrease-font-size) ; C-- decrease font size
-(global-set-key (kbd "<f12>") 'revert-buffer-no-confirm)
-(global-set-key (kbd "s-h") 'global-hl-line-mode) ; Highlight current line
-
-
-;;----------------------------------------------------------------------------
-;; clock
-;;----------------------------------------------------------------------------
-
-(setq display-time-day-and-date t)
-(display-time)
-
-(provide 'init-gui)
-
-;; End:
-;;; init-gui.el ends here
diff --git a/lisp/init-html.el b/lisp/init-html.el
deleted file mode 100644
index b2ad2ef..0000000
--- a/lisp/init-html.el
+++ /dev/null
@@ -1,13 +0,0 @@
-;;;;;;;;;;;;;;;;;;;;;;;;;
-;; HTML Mode
-;;;;;;;;;;;;;;;;;;;;;;;;;
-
-(add-hook 'html-mode-hook
- (lambda ()
- ;; Default indentation is usually 2 spaces, changing to 4.
- (set (make-local-variable 'sgml-basic-offset) 4)))
-
-;; highlight-indent-guides-mode
-(add-hook 'html-mode-hook 'highlight-indent-guides-mode)
-
-(provide 'init-html)
diff --git a/lisp/init-icons.el b/lisp/init-icons.el
deleted file mode 100644
index 198d8c0..0000000
--- a/lisp/init-icons.el
+++ /dev/null
@@ -1,17 +0,0 @@
-;;----------------------------------
-;; All-the-icons
-;;----------------------------------
-(use-package all-the-icons)
-
-;;----------------------------------
-;; Fonts - connecting with neotree
-;;---------------------------------
-(if (file-exists-p "~/.local/share/fonts/all-the-icons.ttf")
- (message "the icons are installed :)")
- (setq neotree-mode-hook 'all-the-icons-install-fonts)
- )
-
-;; fix performace
-(setq inhibit-compacting-font-caches t)
-
-(provide 'init-icons)
diff --git a/lisp/init-indent-guides.el b/lisp/init-indent-guides.el
deleted file mode 100644
index 24fb8d2..0000000
--- a/lisp/init-indent-guides.el
+++ /dev/null
@@ -1,9 +0,0 @@
-;; This minor mode highlights indentation levels via font-lock
-
-(use-package highlight-indent-guides
- :config
- (setq highlight-indent-guides-method 'character)
- ;; Indent character samples: fill, column or character
- (setq highlight-indent-guides-method 'character))
-
-(provide 'init-indent-guides)
diff --git a/lisp/init-less.el b/lisp/init-less.el
deleted file mode 100644
index fdd5527..0000000
--- a/lisp/init-less.el
+++ /dev/null
@@ -1,7 +0,0 @@
-;;----------------------------------------------------------------------------
-;; Less Mode
-;;----------------------------------------------------------------------------
-(use-package less-css-mode
- :mode ("\\.less\\'" . less-css-mode))
-
-(provide 'init-less)
diff --git a/lisp/init-markdown.el b/lisp/init-markdown.el
deleted file mode 100644
index 0e86560..0000000
--- a/lisp/init-markdown.el
+++ /dev/null
@@ -1,33 +0,0 @@
-;;----------------------------------------------------------------------------
-;; Markdown mode
-;;----------------------------------------------------------------------------
-(use-package markdown-mode
- :mode (("\\.markdown\\'" . markdown-mode)
- ("\\.md\\'" . markdown-mode))
-
- :config
- ;;----------------------------------------------------------------------------
- ;; Generated HTML 5 and UTF-8 with Markdown
- ;;----------------------------------------------------------------------------
- (eval-after-load "markdown-mode"
- '(defalias 'markdown-add-xhtml-header-and-footer 'as/markdown-add-xhtml-header-and-footer))
-
- (defun as/markdown-add-xhtml-header-and-footer (title)
- "Wrap XHTML header and footer with given TITLE around current buffer."
- (goto-char (point-min))
- (insert "<!DOCTYPE html>\n"
- "<html>\n"
- "<head>\n<title>")
- (insert title)
- (insert "</title>\n")
- (insert "<meta charset=\"utf-8\" />\n")
- (when (> (length markdown-css-paths) 0)
- (insert (mapconcat 'markdown-stylesheet-link-string markdown-css-paths "\n")))
- (insert "\n</head>\n\n"
- "<body>\n\n")
- (goto-char (point-max))
- (insert "\n"
- "</body>\n"
- "</html>\n")))
-
-(provide 'init-markdown)
diff --git a/lisp/init-modeline.el b/lisp/init-modeline.el
deleted file mode 100644
index 56e4f3d..0000000
--- a/lisp/init-modeline.el
+++ /dev/null
@@ -1,46 +0,0 @@
-;;----------------------------------------------------------------------------
-;; Modeline configuration
-;;----------------------------------------------------------------------------
-
-(use-package smart-mode-line)
-(use-package smart-mode-line-powerline-theme)
-(use-package sml-modeline
- :config
- ;; Show number of occurrences when searching
- (setq sml/theme 'powerline)
-
- (setq sml/no-confirm-load-theme t)
- (setq sml/shorten-modes t)
- ;; Show EOL mode
- (setq sml/show-eol t)
- ;; Show remote buffers
- (setq sml/show-remote t)
-
- (sml/setup)
- (add-to-list 'sml/replacer-regexp-list '("^~/Proyectos/git/" ":Git:") t)
- (add-to-list 'sml/replacer-regexp-list '("^~/www/" ":www:") t)
-
- (sml-modeline-mode t))
-(use-package anzu
- :config
- (custom-set-variables
- '(anzu-search-threshold 1000)
- '(anzu-replace-threshold 1000)
- '(anzu-deactivate-region t)
- '(anzu-input-idle-delay 0.1)
- '(anzu-replace-to-string-separator " => "))
- (global-anzu-mode +1)
- (set-face-attribute 'anzu-mode-line nil
- :foreground "yellow" :weight 'bold)
-
- (define-key isearch-mode-map [remap isearch-query-replace] #'anzu-isearch-query-replace)
- (define-key isearch-mode-map [remap isearch-query-replace-regexp] #'anzu-isearch-query-replace-regexp)
-
- ;;----------------------------------------------------------------------------
- ;; Keyboard shortcuts in Anzu Mode
- ;;----------------------------------------------------------------------------
- (global-set-key (kbd "M-%") 'anzu-query-replace)
- (global-set-key (kbd "s-<SPC>") 'anzu-query-replace))
-
-(myemacs/elapsed-time)
-(provide 'init-modeline)
diff --git a/lisp/init-neotree.el b/lisp/init-neotree.el
deleted file mode 100644
index ff38aa8..0000000
--- a/lisp/init-neotree.el
+++ /dev/null
@@ -1,90 +0,0 @@
-;;; init-neotree.el --- .Emacs Configuration -*- lexical-binding: t -*-
-;;; Commentary:
-;;
-
-;;; Code:
-;;-----------------------------------
-;; Neotree - NerdTree for Vim
-;;-----------------------------------
-
-(use-package shrink-path
- :ensure t)
-
-(use-package neotree
- :ensure t
- :commands (neotree-show
- neotree-hide
- neotree-toggle
- neotree-dir
- neotree-find
- neo-global--with-buffer
- neo-global--window-exists-p)
- :bind (([f8] . neotree-toggle)
- (:map neotree-mode-map
- ("<C-return>" . neotree-change-root)
- ("C" . neotree-change-root)
- ("c" . neotree-create-node)
- ("+" . neotree-create-node)
- ("d" . neotree-delete-node)
- ("r" . neotree-rename-node)))
- :config
- (setq neo-create-file-auto-open nil
- neo-auto-indent-point nil
- neo-autorefresh t
- neo-smart-open t
- neo-mode-line-type 'none
- neo-window-width 25
- neo-show-updir-line nil
- neo-theme (if (display-graphic-p) 'icons 'arrow)
- neo-banner-message nil
- neo-confirm-create-file #'off-p
- neo-confirm-create-directory #'off-p
- neo-show-hidden-files nil
- neo-keymap-style 'concise
- neo-hidden-regexp-list
- '(;; vcs folders
- "^\\.\\(git\\|hg\\|svn\\)$"
- ;; compiled files
- "\\.\\(pyc\\|o\\|elc\\|lock\\|css.map\\)$"
- ;; generated files, caches or local pkgs
- "^\\(node_modules\\|vendor\\|.\\(project\\|cask\\|yardoc\\|sass-cache\\)\\)$"
- ;; org-mode folders
- "^\\.\\(sync\\|export\\|attach\\)$"
- "~$"
- "^#.*#$"))
-
- (when (bound-and-true-p winner-mode)
- (push neo-buffer-name winner-boring-buffers))
-
- (defun shrink-root-entry (node)
- "shrink-print pwd in neotree"
- (insert (propertize (concat (shrink-path-dirs node) "\n") 'face `(:inherit (,neo-root-dir-face)))))
-
- (advice-add #'neo-buffer--insert-root-entry :override #'shrink-root-entry))
-
-(defun neotree-project-dir-toggle ()
- "Open NeoTree using the project root, using find-file-in-project or the current buffer directory."
- (interactive)
- (let ((project-dir
- (ignore-errors
- ;;; Pick one: projectile or find-file-in-project
- (projectile-project-root)))
- (file-name (buffer-file-name))
- (neo-smart-open t))
- (if (and (fboundp 'neo-global--window-exists-p)
- (neo-global--window-exists-p))
- (neotree-hide)
- (progn
- (neotree-show)
- (if project-dir
- (neotree-dir project-dir))
- (if file-name
- (neotree-find file-name))))))
-
-
-(provide 'init-neotree)
-
-;; Local Variables:
-;; byte-compile-warnings: (not free-vars)
-;; End:
-;;; init-neotree.el ends here
diff --git a/lisp/init-nginx.el b/lisp/init-nginx.el
deleted file mode 100644
index 2ed0b4d..0000000
--- a/lisp/init-nginx.el
+++ /dev/null
@@ -1,7 +0,0 @@
-;;---------------------------
-;; Nginx Mode
-;;---------------------------
-(use-package nginx-mode
- :mode ("/nginx/sites-\\(?:available\\|enabled\\)/" . nginx-mode))
-
-(provide 'init-nginx)
diff --git a/lisp/init-nlinum.el b/lisp/init-nlinum.el
deleted file mode 100644
index bd2737f..0000000
--- a/lisp/init-nlinum.el
+++ /dev/null
@@ -1,76 +0,0 @@
-;;----------------------------------------------------------------------------
-;; Line numbers
-;;----------------------------------------------------------------------------
-;; Linum snippets from: https://www.emacswiki.org/emacs/LineNumbers
-(use-package nlinum)
-(use-package linum)
-(use-package hl-line)
-
-(defface my-linum-hl
- `((t :inherit linum :background ,(face-background 'hl-line nil t)))
- "Face for the current line number."
- :group 'linum)
-(add-hook 'linum-before-numbering-hook 'my-linum-get-format-string)
-
-(defun my-linum-get-format-string ()
- (let* ((width (1+ (length (number-to-string
- (count-lines (point-min) (point-max))))))
- (format (concat "%" (number-to-string width) "d \u2502")))
- (setq my-linum-format-string format)))
-
-(defvar my-linum-current-line-number 0)
-
-(defun my-linum-format (line-number)
- (propertize (format my-linum-format-string line-number) 'face
- (if (eq line-number my-linum-current-line-number)
- 'my-linum-hl
- 'linum)))
-(setq linum-format 'my-linum-format)
-
-(defadvice linum-update (around my-linum-update)
- (let ((my-linum-current-line-number (line-number-at-pos)))
- ad-do-it))
-(ad-activate 'linum-update)
-
-(defvar *linum-mdown-line* nil)
-
-(defun line-at-click ()
- (save-excursion
- (let ((click-y (cdr (cdr (mouse-position))))
- (line-move-visual-store line-move-visual))
- (setq line-move-visual t)
- (goto-char (window-start))
- (next-line (1- click-y))
- (setq line-move-visual line-move-visual-store)
- ;; If you are using tabbar substitute the next line with
- ;; (line-number-at-pos))))
- (1+ (line-number-at-pos)))))
-
-(defun md-select-linum ()
- (interactive)
- (goto-line (line-at-click))
- (set-mark (point))
- (setq *linum-mdown-line*
- (line-number-at-pos)))
-
-(defun mu-select-linum ()
- (interactive)
- (when *linum-mdown-line*
- (let (mu-line)
- ;; (goto-line (line-at-click))
- (setq mu-line (line-at-click))
- (goto-line (max *linum-mdown-line* mu-line))
- (set-mark (line-end-position))
- (goto-line (min *linum-mdown-line* mu-line))
- (setq *linum-mdown*
- nil))))
-
-(global-set-key (kbd "<left-margin> <down-mouse-1>") 'md-select-linum)
-(global-set-key (kbd "<left-margin> <mouse-1>") 'mu-select-linum)
-(global-set-key (kbd "<left-margin> <drag-mouse-1>") 'mu-select-linum)
-
-(add-hook 'find-file-hook (lambda () (linum-mode 1)))
-(linum-mode)
-(setq global-linum-mode t)
-
-(provide 'init-nlinum)
diff --git a/lisp/init-php.el b/lisp/init-php.el
deleted file mode 100644
index b81e5b8..0000000
--- a/lisp/init-php.el
+++ /dev/null
@@ -1,29 +0,0 @@
-;;; init-php.el --- .Emacs Configuration -*- lexical-binding: t -*-
-;;; Commentary:
-;;
-
-;;; Code:
-(use-package php-refactor-mode
- :after (php-mode)
- :mode ("\\.php\\'" . php-mode)
- :config
- (add-hook 'php-mode-hook 'php-refactor-mode))
-
-(use-package php-mode
- :ensure t)
-
-(use-package company-php
- :ensure t
- :config
- (defun cfg:php-mode-hook ()
- (interactive)
- (require 'company-php)
- (company-mode t)
- (add-to-list 'company-backends 'company-ac-php-backend))
-
- (add-hook 'php-mode-hook 'cfg:php-mode-hook))
-
-(add-hook 'php-mode-hook (lambda () (subword-mode 1)))
-
-(provide 'init-php)
-;;; init-php.el ends here
diff --git a/lisp/init-pkgbuild.el b/lisp/init-pkgbuild.el
deleted file mode 100644
index 6f6835c..0000000
--- a/lisp/init-pkgbuild.el
+++ /dev/null
@@ -1,4 +0,0 @@
-(use-package pkgbuild-mode
- :mode ("/PKGBUILD$" . pkgbuild-mode))
-
-(provide 'init-pkgbuild)
diff --git a/lisp/init-python.el b/lisp/init-python.el
deleted file mode 100644
index fd2845a..0000000
--- a/lisp/init-python.el
+++ /dev/null
@@ -1,32 +0,0 @@
-;;----------------------------------------------------------------------------
-;; Python Mode
-;;----------------------------------------------------------------------------
-(add-hook 'python-mode-hook
- (lambda ()
- (setq indent-tabs-mode nil)
- (setq python-indent-guess-indent-offset nil)
- (setq python-indent-offset 4)))
-
-
-;;----------------------------------------------------------------------------
-;; Jedi - Python auto-completion for Emacs
-;;----------------------------------------------------------------------------
-(use-package jedi)
-(setq auto-mode-alist
- (append '(("SConstruct\\'" . python-mode)
- ("SConscript\\'" . python-mode))
- auto-mode-alist))
-
-(use-package pip-requirements)
-(defun my/python-mode-stuff ()
- ;; Jedi makes everything a lot easier for everybody!
- (jedi:setup)
- (define-key python-mode-map (kbd "C-]") 'jedi:goto-definition) ;goto define
- (local-set-key (kbd "<f1>") 'jedi:show-doc)
- (setq jedi:complete-on-dot t) ; optional
- )
-;; Added Jedi-mode to python-mode
-(add-hook 'python-mode-hook 'my/python-mode-stuff)
-;; M-x jedi:install-server
-
-(provide 'init-python)
diff --git a/lisp/init-rainbow.el b/lisp/init-rainbow.el
deleted file mode 100644
index 8305867..0000000
--- a/lisp/init-rainbow.el
+++ /dev/null
@@ -1,11 +0,0 @@
-;; rainbow-mode
-(use-package rainbow-mode
- :init
- (add-hook 'css-mode-hook 'rainbow-mode)
- (add-hook 'sass-mode-hook 'rainbow-mode)
- (add-hook 'scss-mode-hook 'rainbow-mode)
- (add-hook 'less-mode-hook 'rainbow-mode)
- (add-hook 'web-mode-hook 'rainbow-mode)
- (add-hook 'html-mode-hook 'rainbow-mode))
-
-(provide 'init-rainbow)
diff --git a/lisp/init-ready.el b/lisp/init-ready.el
deleted file mode 100644
index 787a5d0..0000000
--- a/lisp/init-ready.el
+++ /dev/null
@@ -1,13 +0,0 @@
-;;-------------------------
-;; Emacs Ready :)
-;;-------------------------
-
-(add-hook 'emacs-startup-hook
- (lambda ()
- (message "Emacs cargado en %s y listo para ser usado."
- (format "%.2f segundos"
- (float-time
- (time-subtract after-init-time before-init-time)))
- gcs-done)))
-
-(provide 'init-ready)
diff --git a/lisp/init-sass.el b/lisp/init-sass.el
deleted file mode 100644
index bcce530..0000000
--- a/lisp/init-sass.el
+++ /dev/null
@@ -1,7 +0,0 @@
-;;----------------------------------------------------------------------------
-;; Sass Mode
-;;----------------------------------------------------------------------------
-(use-package sass-mode
- :mode ("\\.sass\\'" . sass-mode))
-
-(provide 'init-sass)
diff --git a/lisp/init-scss.el b/lisp/init-scss.el
deleted file mode 100644
index a9c4a63..0000000
--- a/lisp/init-scss.el
+++ /dev/null
@@ -1,7 +0,0 @@
-;;----------------------------------------------------------------------------
-;; Scss Mode
-;;----------------------------------------------------------------------------
-(use-package scss-mode
- :mode ("\\.scss\\'" . scss-mode))
-
-(provide 'init-scss)
diff --git a/lisp/init-security.el b/lisp/init-security.el
deleted file mode 100644
index 995916d..0000000
--- a/lisp/init-security.el
+++ /dev/null
@@ -1,12 +0,0 @@
-;;---------------------------------------------------------------------------------------------
-;; Security. Check https://web.archive.org/web/20170413150436/https://ogbe.net/emacsconfig.html
-;;---------------------------------------------------------------------------------------------
-(setq tls-checktrust t)
-(setq gnutls-verify-error t)
-(let ((trustfile "/etc/ssl/cert.pem"))
- (setq tls-program
- `(,(format "gnutls-cli --x509cafile %s -p %%p %%h" trustfile)
- ,(format "openssl s_client -connect %%h:%%p -CAfile %s -no_ssl2 -ign_eof" trustfile)))
- (setq gnutls-trustfiles (list trustfile)))
-
-(provide 'init-security)
diff --git a/lisp/init-theme.el b/lisp/init-theme.el
deleted file mode 100644
index b3f0cd1..0000000
--- a/lisp/init-theme.el
+++ /dev/null
@@ -1,10 +0,0 @@
-(use-package sublime-themes
- :config
- (load-theme 'spolsky t)
- ;; Fix linum current-line highlight. Doesn't looks good with this theme
- (defface my-linum-hl
- '((t :background "gray30" :foreground "gold"))
- "Face for the currently active Line number"
- :group 'linum))
-
-(provide 'init-theme)
diff --git a/lisp/init-utils.el b/lisp/init-utils.el
deleted file mode 100644
index a0b9fe0..0000000
--- a/lisp/init-utils.el
+++ /dev/null
@@ -1,24 +0,0 @@
-;; Loads functions from libs
-(defun load-directory (dir)
- (let ((load-it (lambda (f)
- (load-file (concat (file-name-as-directory dir) f)))
- ))
- (mapc load-it (directory-files dir nil "\\.el$"))))
-
-;; Load lib functions
-(load-directory (expand-file-name "~/.emacs.d/lisp/lib/" user-emacs-directory))
-
-;; This is borrowed from https://github.com/purcell/emacs.d/blob/master/lisp/init-utils.el by Steve Purcell but I have added some stuff.
-
-(if (fboundp 'with-eval-after-load)
- (defalias 'after-load 'with-eval-after-load)
- (defmacro after-load (feature &rest body)
- "After FEATURE is loaded, evaluate BODY."
- (declare (indent defun))
- '(eval-after-load, feature
- '(progn, @body))))
-
-;; Elapsed time
-(myemacs/elapsed-time)
-
-(provide 'init-utils)
diff --git a/lisp/init-web-mode.el b/lisp/init-web-mode.el
deleted file mode 100644
index 720e7ec..0000000
--- a/lisp/init-web-mode.el
+++ /dev/null
@@ -1,14 +0,0 @@
-(use-package web-mode
- :mode (("\\.html?\\'" . web-mode)
- ("\\.djhtml\\'" . web-mode)
- ("\\.tpl\\'" . web-mode)
- ("\\.jsp\\'" . web-mode)
- ("\\.gsp\\'" . web-mode)
- ("\\.ctp\\'" . web-mode))
- :config
- ;; web-modeの設定
- (setq web-mode-enable-current-element-highlight t)
- (set-face-background 'web-mode-current-element-highlight-face "#a3a3a3")
- )
-
-(provide 'init-web-mode)
diff --git a/lisp/init-whitespace.el b/lisp/init-whitespace.el
deleted file mode 100644
index 27f61c3..0000000
--- a/lisp/init-whitespace.el
+++ /dev/null
@@ -1,6 +0,0 @@
-;;----------------------------------------------------------------------------
-;; Whitespace Mode | tool
-;;----------------------------------------------------------------------------
-(use-package whitespace-cleanup-mode)
-
-(provide 'init-whitespace)
diff --git a/lisp/init-yaml.el b/lisp/init-yaml.el
deleted file mode 100644
index 637cb7b..0000000
--- a/lisp/init-yaml.el
+++ /dev/null
@@ -1,5 +0,0 @@
-;; yaml-mode
-(use-package yaml-mode
- :mode ("\\.yml\\'" . yaml-mode))
-
-(provide 'init-yaml)
diff --git a/lisp/lib/myemacs.el b/lisp/lib/myemacs.el
deleted file mode 100644
index 6846bdc..0000000
--- a/lisp/lib/myemacs.el
+++ /dev/null
@@ -1,18 +0,0 @@
-;;----------------------------------------------------------------------------
-;; Some cool functions
-;;----------------------------------------------------------------------------
-;; These functions are made by me (Quitter: @heckyel) or
-;; heavily modified by me
-
-;;----------------------------------------------------------------------------
-;; Toggles fullscreen
-;;----------------------------------------------------------------------------
-(defun myemacs/toggle-fullscreen ()
- (interactive)
- (x-send-client-message nil 0 nil "_NET_WM_STATE" 32
- '(2 "_NET_WM_STATE_FULLSCREEN" 0)))
-
-(defun myemacs/elapsed-time ()
- (let ((elapsed (float-time (time-subtract (current-time)
- emacs-start-time))))
- (message "[STARTUP] Loading %s ... done (%.3fs)" load-file-name elapsed))) \ No newline at end of file
diff --git a/lisp/lib/sachachua.el b/lisp/lib/sachachua.el
deleted file mode 100644
index c862223..0000000
--- a/lisp/lib/sachachua.el
+++ /dev/null
@@ -1,39 +0,0 @@
-;; Increase-decrease functions from Sacha Chua
-(defun sacha/increase-font-size ()
- (interactive)
- (set-face-attribute 'default
- nil
- :height
- (ceiling (* 1.10
- (face-attribute 'default :height)))))
-(defun sacha/decrease-font-size ()
- (interactive)
- (set-face-attribute 'default
- nil
- :height
- (floor (* 0.9
- (face-attribute 'default :height)))))
-
-;; Not original from Sacha. Taken from: http://emacsredux.com/blog/2013/05/22/smarter-navigation-to-the-beginning-of-a-line/
-(defun sacha/smarter-move-beginning-of-line (arg)
- "Move point back to indentation of beginning of line.
-
-Move point to the first non-whitespace character on this line.
-If point is already there, move to the beginning of the line.
-Effectively toggle between the first non-whitespace character and
-the beginning of the line.
-
-If ARG is not nil or 1, move forward ARG - 1 lines first. If
-point reaches the beginning or end of the buffer, stop there."
- (interactive "^p")
- (setq arg (or arg 1))
-
- ;; Move lines first
- (when (/= arg 1)
- (let ((line-move-visual nil))
- (forward-line (1- arg))))
-
- (let ((orig-point (point)))
- (back-to-indentation)
- (when (= orig-point (point))
- (move-beginning-of-line 1))))