(add-hook 'prog-mode-hook 'hl-line-mode)
(add-hook 'text-mode-hook 'hl-line-mode)
(add-hook 'dired-mode-hook 'hl-line-mode)
+
+ ;; only highlight selected window
+ (setq hl-line-sticky-flag nil)
+
+ (setq-default fill-column 120)
+ (add-hook 'text-mode-hook 'turn-on-auto-fill)
#+END_SRC
** Smart Comments
*** Agenda Setup
Setting agenda files and the agenda view
#+BEGIN_SRC emacs-lisp :tangle yes :results silent
- (setq org-agenda-files (quote ("~/org/gtd.org"
- "~/org/work.org")))
+ (setq org-agenda-files (quote ("~/org/gtd.org")))
;; only show today's tasks in agenda view
;; (setq org-agenda-span 'day)
(setq org-agenda-show-all-dates t)
#+END_SRC
+** Org mobile
+#+BEGIN_SRC emacs-lisp :tangle yes :results silent
+ (with-eval-after-load "org"
+ (require 'org-mobile)
+ ;; Set to the location of your Org files on your local system
+ ;; (setq org-directory "~/org")
+ ;; Set to the name of the file where new notes will be stored
+ (setq org-mobile-inbox-for-pull "~/org/flagged.org")
+ ;; Set to <your Dropbox root directory>/MobileOrg.
+ (setq org-mobile-directory "~/Dropbox/Apps/MobileOrg"))
+#+END_SRC
+
** Export PDF
Install MacTex-basic [[http://www.tug.org/mactex/morepackages.html][MacTex-basic]] and some tex packages
#+BEGIN_SRC sh
*** variable-pitch-mode and fixed-pitch-mode
[[https://yoo2080.wordpress.com/2013/05/30/monospace-font-in-tables-and-source-code-blocks-in-org-mode-proportional-font-in-other-parts/][monospace font in tables and source code blocks in org-mode, proportional font in other parts]]
#+BEGIN_SRC emacs-lisp :tangle yes :results silent
- ;; check if the fonts are available
(unless (find-font (font-spec :name "Ubuntu Mono"))
(warn "Font not found Ubuntu Mono"))
(unless (find-font (font-spec :name "Source Code Pro"))
(set-face-attribute face nil :inherit 'fixed-pitch))
(list 'org-code 'org-block 'org-block-background 'org-block-begin-line 'org-block-end-line))
(set-face-attribute 'org-table nil :family "Ubuntu Mono" :height 140)
+ (set-face-attribute 'org-formula nil :family "Ubuntu Mono" :height 140)
;; org-special-keyword inherited from font-lock-keywork originally; as org is changed to variable-pitch, it cause
;; the font in special-keywords are not monospace
(set-face-attribute 'org-special-keyword nil :inherit '(font-lock-keyword-face fixed-pitch))
(add-hook 'c++-mode-hook 'google-set-c-style))
#+END_SRC
+*** Compile and Run the C file
+#+BEGIN_SRC emacs-lisp :tangle yes :results silent
+ (defun my-cpp-hook ()
+ (let* ((current-file-name)
+ (a-dot-out-file))
+ (when buffer-file-name
+ (setq current-file-name (shell-quote-argument buffer-file-name))
+ (setq a-dot-out-file (concat (file-name-directory buffer-file-name) "a.out")))
+ (setq-local compilation-read-command t)
+ (set (make-local-variable 'compile-command)
+ (concat "g++ -Wall "
+ current-file-name
+ " && "
+ a-dot-out-file))
+ (local-set-key (kbd "s-r") 'compile)))
+
+ (add-hook 'c-mode-hook 'my-cpp-hook)
+ (add-hook 'c++-mode-hook 'my-cpp-hook)
+#+END_SRC
+
** Lua
#+BEGIN_SRC emacs-lisp :tangle yes :results silent
(use-package lua-mode
(add-to-list 'projectile-globally-ignored-files "GTAGS")
(projectile-global-mode t))
- ;; (use-package persp-projectile
- ;; :ensure t
- ;; :config
- ;; (persp-mode)
- ;; :bind
- ;; ;; (:map projectile-mode-map
- ;; ;; ("s-t" . projectile-persp-switch-project))
- ;; )
-
;; change default-directory of scratch buffer to projectile-project-root
(defun sd/project-switch-action ()
"Change default-directory of scratch buffer to current projectile-project-root directory"
(define-key perspeen-mode-map (kbd "s-t") 'perspeen-tab-create-tab))
#+END_SRC
-* TODO todolist
-** Rucket
-** player video on iphone for
-** SICP
-** music searcher
-search music on some music web site
-
-
-
-** Need separate the Key-bindings and package-initialization
* Note
** Check if emacs is in terminal of graphic mode
Use =display-graphic-p= instead of =window-system=