重装系统：软件安装过程记录

source 'https://mirrors.tuna.tsinghua.edu.cn/rubygems'
#gem 'github-pages', group: :jekyll_plugins
# gem 'jekyll-feed'
gem 'jekyll-paginate'
gem 'jekyll-sitemap'
gem 'jemoji'

source 'https://rubygems.org'
gem 'github-pages', group: :jekyll_plugins
gem 'jekyll-feed'
gem 'jekyll-paginate'
gem 'jekyll-sitemap'
gem 'jemoji'

@echo on 
cd C:\Users\houpe\Documents\Local_GitKraken\MyBlog\_config_with_python
python buildMenu.py

cd ..\
jekyll serve -b ""

@echo on 
cd C:\Users\houpe\Documents\Local_GitKraken\MyBlog\_config_with_python
python buildMenu.py

cd ..\
jekyll serve --port 3000 -b ""

;; Added by Package.el.  This must come before configurations of
;; installed packages.  Don't delete this line.  If you don't want it,
;; just comment it out by adding a semicolon to the start of the line.
;; You may delete these explanatory comments.
(package-initialize)

(custom-set-variables
 ;; custom-set-variables was added by Custom.
 ;; If you edit it by hand, you could mess it up, so be careful.
 ;; Your init file should contain only one such instance.
 ;; If there is more than one, they won't work right.
 '(TeX-source-correlate-method (quote synctex))
 '(TeX-source-correlate-mode t)
 '(TeX-source-correlate-start-server t)
 '(TeX-view-program-list
   (quote
    (("Sumatra PDF" "\"C:/Program Files/SumatraPDF/SumatraPDF.exe\" -reuse-instance %o"))))
 '(ac-ispell-fuzzy-limit 2)
 '(ac-ispell-requires 4)
 '(ansi-color-faces-vector
   [default default default italic underline success warning error])
 '(ansi-color-names-vector
   ["#242424" "#e5786d" "#95e454" "#cae682" "#8ac6f2" "#333366" "#ccaa8f" "#f6f3e8"])
 '(case-fold-search t)
 '(current-language-environment "UTF-8")
 '(custom-enabled-themes (quote (tango-dark)))
 '(inhibit-startup-screen t)
 '(initial-major-mode (quote text-mode))
 '(initial-scratch-message nil)
 '(longlines-show-hard-newlines t)
 '(longlines-wrap-follows-window-size t)
 '(org-export-backends (quote (ascii beamer html latex md)))
 '(org-file-apps
   (quote
    ((auto-mode . emacs)
     ("\\.mm\\'" . default)
     ("\\.x?html?\\'" . default)
     ("\\.pdf\\'" . "\"C:/Program Files/SumatraPDF/SumatraPDF.exe\" -reuse-instance %s"))))
 '(package-selected-packages (quote (company-auctex company auctex cnfonts)))
 '(reftex-plug-into-AUCTeX t)
 '(safe-local-variable-values (quote ((TeX-master . t))))
 '(temporary-file-directory "c:/tools/emacs_tmp")
 '(transient-mark-mode (quote identity)))
(custom-set-faces
 ;; custom-set-faces was added by Custom.
 ;; If you edit it by hand, you could mess it up, so be careful.
 ;; Your init file should contain only one such instance.
 ;; If there is more than one, they won't work right.
 )
(load-file "D:/emacs/etc/.emacs")

;;(require 'linum)  
;;(global-linum-mode t)  
;;显示列号    
;;(column-number-mode t)  
;;让Emacs 可以直接打开和显示图片
(setq auto-image-file-mode t)


;;Q：在org-mode中没有自动换行，实现方法参看Emacs org mode学习笔记A：修改配置文件SUBDIRS.EL或.emacs，加上一句即可
(add-hook 'org-mode-hook (lambda () (setq truncate-lines nil)))

;;加入TODO依赖
(setq org-enforce-todo-dependencies t)
;;对于TODO项，记录完成的时刻
;;(setq org-log-done 'time)

;;启动窗口最大化
(run-with-idle-timer 0.05 nil 'w32-send-sys-command 61488)

;;设置初始目录为emacs项目目录  

;;设置latex的默认pdf阅读器
;;来自http://tex.stackexchange.com/questions/52078/sumatrapdf-with-auctex-and-foxit-reader-as-the-default-viewer
(setq TeX-view-program-list
      '(("Sumatra PDF"
         "\"C:/Program Files/SumatraPDF/SumatraPDF.exe\" -reuse-instance %o")));;这个地方是%o还是%s待定

(setq TeX-view-program-selection
      '(((output-dvi style-pstricks) "dvips and start")
        (output-dvi "Yap")
        (output-pdf "Sumatra PDF")
        (output-html "start")))

;;reftex设置 来自官方文档
(require 'reftex)
;;http://blog.modelworks.ch/?p=379 and http://www.clarkdonley.com/blog/2014-10-26-org-mode-and-writing-papers-some-tips.html
(defun org-mode-reftex-setup ()
  (load-library "reftex")
  (and (buffer-file-name) (file-exists-p (buffer-file-name))
       (progn
     ;enable auto-revert-mode to update reftex when bibtex file changes on disk
     (global-auto-revert-mode t)
     (reftex-parse-all)
     ;add a custom reftex cite format to insert links
     ;(reftex-set-cite-format "[[papers:%l][%l]]: %t \n")
     ))
  (define-key org-mode-map (kbd "C-c )") 'reftex-citation)
)  
(add-hook 'org-mode-hook 'org-mode-reftex-setup) 
(add-hook 'org-mode-hook 'turn-on-reftex)

;;设置产生pdf的过程   这个是不行的
;;(setq org-latex-to-pdf-process
;; '("pdflatex %f" "biber %b" "pdflatex %f" "pdflatex %f"))
;;设置产生pdf的过程        这个是可以的
;;(setq org-latex-pdf-process
;;  '("latexmk -pdflatex='pdflatex -interaction nonstopmode' -pdf -bibtex -f %f" "latexmk -c"))
;;这个也可以 有时是不行的，还是不要用了！
;;(setq org-latex-pdf-process (list "latexmk -f -pdf %f" "latexmk -c"))
(setq org-latex-pdf-process
  '("latexmk -pdflatex='xelatex -interaction nonstopmode' -pdf -bibtex -f %f" "latexmk -c"))


;;移动，上下，即，将某一行上下移动 
;;来自http://stackoverflow.com/questions/2423834/move-line-region-up-and-down-in-emacs
(defun move-text-internal (arg)
  (cond
   ((and mark-active transient-mark-mode)
    (if (> (point) (mark))
        (exchange-point-and-mark))
    (let ((column (current-column))
          (text (delete-and-extract-region (point) (mark))))
      (forward-line arg)
      (move-to-column column t)
      (set-mark (point))
      (insert text)
      (exchange-point-and-mark)
      (setq deactivate-mark nil)))
   (t
    (let ((column (current-column)))
      (beginning-of-line)
      (when (or (> arg 0) (not (bobp)))
        (forward-line)
        (when (or (< arg 0) (not (eobp)))
          (transpose-lines arg)
          (when (and (eval-when-compile
                       '(and (>= emacs-major-version 24)
                             (>= emacs-minor-version 3)))
                     (< arg 0))
            (forward-line -1)))
        (forward-line -1))
      (move-to-column column t)))))
(defun move-text-down (arg)
  "Move region (transient-mark-mode active) or current line
  arg lines down."
  (interactive "*p")
  (move-text-internal arg))
(defun move-text-up (arg)
  "Move region (transient-mark-mode active) or current line
  arg lines up."
  (interactive "*p")
  (move-text-internal (- arg)))
(global-set-key [M-S-up] 'move-text-up)
(global-set-key [M-S-down] 'move-text-down)


;; 设置默认编码
(setq default-buffer-file-coding-system 'utf-8)

;; c-x c-f 的时候用上下箭头来选择历史文件。
;; from  http://stackoverflow.com/questions/3527150/open-recent-in-emacs
(savehist-mode 1)
 
;;设置auctex
;; auctex setup according to https://www.emacswiki.org/emacs/AUCTeX
(setq TeX-auto-save t)
(setq TeX-parse-self t)
(setq-default TeX-master nil)
(add-hook 'LaTeX-mode-hook 'visual-line-mode)
(add-hook 'LaTeX-mode-hook 'flyspell-mode)
(add-hook 'LaTeX-mode-hook 'LaTeX-math-mode)
(add-hook 'LaTeX-mode-hook 'turn-on-reftex)
(setq reftex-plug-into-AUCTeX t)
(setq TeX-PDF-mode t)
;; my add
(add-hook 'LaTeX-mode-hook 'outline-minor-mode)

;;设置必应词典的快捷键
;; https://github.com/cute-jumper/bing-dict.el
(global-set-key (kbd "C-c d") 'bing-dict-brief)

;;Inverse search with Emacs/AucTeX and SumatraPDF
;;https://tex.stackexchange.com/questions/286028/inverse-search-with-emacs-auctex-and-sumatrapdf-on-windows-10
(server-start)

;;设置：使用 company-mode in all buffers
;;来自：http://company-mode.github.io/
(add-hook 'after-init-hook 'global-company-mode)