X-Git-Url: http://47.100.26.94:8080/?a=blobdiff_plain;f=emacs.d_2%2Fconfig.org;h=e7e85713e60caf362ca415ef66f3216ba3bcea1b;hb=3524cafbf7a7e3c373df84acfb2806a477d5e982;hp=438add5ab1a5742afc9dfb092cbdaa3768a490bd;hpb=3ceaa13d38dc0a152c6f613c5690f9fae3bd1271;p=dotfiles.git diff --git a/emacs.d_2/config.org b/emacs.d_2/config.org index 438add5..e7e8571 100644 --- a/emacs.d_2/config.org +++ b/emacs.d_2/config.org @@ -8,15 +8,7 @@ Most config are just copied from [[https://github.com/howardabrams/dot-files][ho * Basic Settings -** Setting Path - -Set the system PATH environment - -#+BEGIN_SRC emacs-lisp :tangle yes :results silent - - (setenv "PATH" (concat (getenv "PATH") ":/usr/local/bin")) - -#+END_SRC +** Setting loading Path Set the emacs load path @@ -47,7 +39,7 @@ Disable scroll bar, tool-bar and menu-bar (scroll-bar-mode 0) (tool-bar-mode 0) - (menu-bar-mode 0) + (menu-bar-mode 1) (setq debug-on-error t) (setq inhibit-startup-message t) @@ -57,7 +49,9 @@ Disable scroll bar, tool-bar and menu-bar #+END_SRC -* Use-package +* Package Management Tools + +** Use-package Using [[https://github.com/jwiegley/use-package][use-package]] to manage emacs packages @@ -71,6 +65,20 @@ Using [[https://github.com/jwiegley/use-package][use-package]] to manage emacs p #+END_SRC +** El-get + +[[https://github.com/dimitri/el-get][El-get]] is package management tool, whicl allows to install external elisp package from any git repository not in mepla. +Check out [[http://tapoueh.org/emacs/el-get.html][el-get]]. + +#+BEGIN_SRC emacs-lisp :tangle yes :results silent + + (use-package el-get + :ensure t + :init + (add-to-list 'load-path "~/.emacs.d/el-get")) + +#+END_SRC + * Color and Fonts Settings ** highlight current line @@ -237,40 +245,30 @@ improve color for org-mode #+END_SRC - * Org-mode Settings -** Org-bullets - -use [[https://github.com/sabof/org-bullets][org-bullets]] package to show utf-8 charactes - -#+BEGIN_SRC emacs-lisp :tangle yes :results silent - - (use-package org-bullets - :ensure t - :init - (add-hook 'org-mode-hook - (lambda () - (org-bullets-mode t)))) - -#+END_SRC - ** Org-mode Basic setting Always indents header, and hide header leading starts so that no need type =#+STATUP: indent= #+BEGIN_SRC emacs-lisp :tangle yes :results silent - (setq org-startup-indented t) - (setq org-hide-leading-starts t) - ;(setq org-src-fontify-natively t) - (setq org-src-tab-acts-natively t) - (setq org-confirm-babel-evaluate nil) + (use-package org + :ensure t + :init + (setq org-startup-indented t) + (setq org-hide-leading-starts t) + (setq org-src-fontify-natively t) + (setq org-src-tab-acts-natively t) + (setq org-confirm-babel-evaluate nil) + (setq org-use-speed-commands t) + (setq org-completion-use-ido t)) (org-babel-do-load-languages 'org-babel-load-languages '((python . t) (C . t) + (perl . t) (calc . t) (latex . t) (java . t) @@ -283,6 +281,42 @@ Always indents header, and hide header leading starts so that no need type =#+ST #+END_SRC +** Org-bullets + +use [[https://github.com/sabof/org-bullets][org-bullets]] package to show utf-8 charactes + +#+BEGIN_SRC emacs-lisp :tangle yes :results silent + + (use-package org-bullets + :ensure t + :init + (add-hook 'org-mode-hook + (lambda () + (org-bullets-mode t)))) + +#+END_SRC + +** Worf Mode + +[[https://github.com/abo-abo/worf][worf]] mode is an extension of vi-like binding for org-mode. +In =worf-mode=, it is mapping =[=, =]= as =worf-backward= and =worf-forward= in global, wich +cause we cannot input =[= and =]=, so here I unset this mappings. And redifined this two to +=M-[= and =M-]=. see this [[https://github.com/abo-abo/worf/issues/19#issuecomment-223756599][issue]] + +#+BEGIN_SRC emacs-lisp :tangle yes :results silent + + (use-package worf + :ensure t + :commands worf-mode + :init (add-hook 'org-mode-hook 'worf-mode) + :config + (define-key worf-mode-map "[" nil) + (define-key worf-mode-map "]" nil) + (define-key worf-mode-map (kbd "M-[") 'worf-backward) + (define-key worf-mode-map (kbd "M-]") 'worf-forward)) + +#+END_SRC + ** Task Management ** Capture @@ -415,9 +449,34 @@ I like [[https://github.com/coldnew/linum-relative][linum-relative]], just like #+END_SRC -* Programming Languages +** Multi-term + +#+BEGIN_SRC emacs-lisp :tangle yes :results silent + + (use-package multi-term + :ensure t) + +#+END_SRC + +** ace-link -** Emacs Lisp +[[https://github.com/abo-abo/ace-link][ace-link]] is a package written by [[https://github.com/abo-abo][Oleh Krehel]]. It is convenient to jump to link in help mode, info-mode, etc +Type =o= to go to the link + +#+BEGIN_SRC emacs-lisp :tangle yes :results silent + + (use-package ace-link + :ensure t + :init + (ace-link-setup-default)) + +#+END_SRC + +* Programming + +** Languages + +*** Emacs Lisp #+BEGIN_SRC emacs-lisp :tangle yes :results silent @@ -425,14 +484,166 @@ I like [[https://github.com/coldnew/linum-relative][linum-relative]], just like :ensure t :init (add-hook 'emacs-lisp-mode-hook 'color-identifiers-mode) + :diminish color-identifiers-mode) #+END_SRC +*** Perl + +[[https://www.emacswiki.org/emacs/CPerlMode][CPerl mode]] has more features than =PerlMode= for perl programming. Alias this to =CPerlMode= + +#+BEGIN_SRC emacs-lisp :tangle yes :results silent + + (defalias 'perl-mode 'cperl-mode) + + ;(setq cperl-hairy t) ;; Turns on most of the CPerlMode options + (setq cperl-auto-newline t) + (setq cperl-highlight-variables-indiscriminately t) + ;(setq cperl-indent-level 4) + ;(setq cperl-continued-statement-offset 4) + (setq cperl-close-paren-offset -4) + (setq cperl-indent-parents-as-block t) + (setq cperl-tab-always-indent t) + ;(setq cperl-brace-offset 0) + + (add-hook 'cperl-mode-hook + '(lambda () + (cperl-set-style "C++"))) + + ;(require 'template) + ;(template-initialize) + ;(require 'perlnow) + +#+END_SRC + +- auto insert +- run script + +Change the compile-command to set the default command run when call =compile= +Mapping =s-r= (on Mac, it's =Command + R= to run the script. Here =current-prefix-arg= is set +to call =compilation= interactively. + +#+BEGIN_SRC emacs-lisp :tangle yes :results silent + + (defun my-perl-hook () + (progn + (setq-local compilation-read-command nil) + (set (make-local-variable 'compile-command) + (concat "/usr/bin/perl " + (if buffer-file-name + (shell-quote-argument buffer-file-name)))) + (local-set-key (kbd "s-r") + (lambda () + (interactive) + ; (setq current-prefix-arg '(4)) ; C-u + (call-interactively 'compile))))) + + (add-hook 'cperl-mode-hook 'my-perl-hook) + + +#+END_SRC + +*** C & C++ + +#+BEGIN_SRC emacs-lisp :tangle yes :results silent + + (setq c-default-style "stroustrup" + c-basic-offset 4) + +#+END_SRC + +** Compile + +Set the environments vairables in compilation mode + +#+BEGIN_SRC emacs-lisp :tangle yes :results silent + + (use-package compile + :commands compile + :config + (setq compilation-environment (cons "LC_ALL=C" compilation-environment))) + +#+END_SRC + +** Auto-Insert + +Enable auto-insert mode + +#+BEGIN_SRC emacs-lisp :tangle yes :results silenc + + (auto-insert-mode t) + (setq auto-insert-query nil) + +#+END_SRC + +*** C++ Auto Insert + +#+BEGIN_SRC emacs-lisp :tangle yes :results silent + + (eval-after-load 'autoinsert + '(define-auto-insert '("\\.cpp\\'" . "C++ skeleton") + '( + "Short description:" + "/*" + "\n * " (file-name-nondirectory (buffer-file-name)) + "\n */" > \n \n + "#include " \n + "#include \"" + (file-name-sans-extension + (file-name-nondirectory (buffer-file-name))) + ".hpp\"" \n \n + "using namespace std;" \n \n + "int main ()" + "\n{" \n + > _ \n + "return 1;" + "\n}" > \n + ))) + + (eval-after-load 'autoinsert + '(define-auto-insert '("\\.c\\'" . "C skeleton") + '( + "Short description:" + "/*\n" + " * " (file-name-nondirectory (buffer-file-name)) "\n" + " */" > \n \n + "#include " \n + "#include \"" + (file-name-sans-extension + (file-name-nondirectory (buffer-file-name))) + ".h\"" \n \n + "int main ()\n" + "{" \n + > _ \n + "return 1;\n" + "}" > \n + ))) + +#+END_SRC + +*** Perl Auto Insert + +Refer [[https://www.emacswiki.org/emacs/AutoInsertMode][AutoInsertMode]] Wiki + +#+BEGIN_SRC emacs-lisp :tangle yes :results silent + + (eval-after-load 'autoinsert + '(define-auto-insert '("\\.pl\\'" . "Perl skeleton") + '( + "Description: " + "#!/usr/bin/perl -w" \n + \n + "use strict;" \n \n + ))) + +#+END_SRC + + * Others ** Shell pop mode ** Smartparens mode -** +***