lujun9972.github.com/auto_publish.el at source · lujun9972/lujun9972.github.com · GitHub

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
(require 'package)
(let* ((no-ssl (and (memq system-type '(windows-nt ms-dos))
                    (not (gnutls-available-p))))
       (proto (if no-ssl "http" "https")))
  (when no-ssl (warn "\
Your version of Emacs does not support SSL connections,
which is unsafe because it allows man-in-the-middle attacks.
There are two things you can do about this warning:
1. Install an Emacs version that does support SSL and be safe.
2. Remove this warning from your init file so you won't see it again."))
  ;; Comment/uncomment these two lines to enable/disable MELPA and MELPA Stable as desired
  (add-to-list 'package-archives (cons "melpa" (concat proto "://melpa.org/packages/")) t)
  ;;(add-to-list 'package-archives (cons "melpa-stable" (concat proto "://stable.melpa.org/packages/")) t)
  (when (< emacs-major-version 24)
    ;; For important compatibility libraries like cl-lib
    (add-to-list 'package-archives (cons "gnu" (concat proto "://elpa.gnu.org/packages/"))))

  (package-initialize)
  (package-refresh-contents)
  (package-install 'ht)
  (package-install 'dash)
  (package-install 'mustache)
  (package-install 'htmlize)
  (package-install 'yaml-mode)
  (package-install 'lua-mode)
  (package-install 'dockerfile-mode)
  (package-install 'docker-compose-mode)
  (package-install 'ox-gfm)

  (setq load-path (cons  (or (getenv "EGO_DIR") "~/EGO/") load-path))
  (require 'log-edit)
  (require 'htmlize)
  (require 'ego)
  (setq ego-project-config-alist
        `(("blog" :repository-directory ,(or (getenv "REPO_DIR") "~/source") :site-domain "https://lujun9972.github.io/" :site-main-title "暗无天日" :site-sub-title "=============>DarkSun的个人博客" :theme
           (DarkSun)
           :summary
           (("years" :year :updates 20)
            ("tags" :tags)
            ("authors" :authors))
           :source-browse-url
           ("Github" ,(getenv "REPO"))
           ;; :personal-avatar "https://avatar.csdnimg.cn/6/2/4/1_lujun9972.jpg"
           :personal-disqus-shortname "lujun9972" :personal-google-analytics-id "7bac4fd0247f69c27887e0d4e3aee41e" :ignore-file-name-regexp "README.org" :store-dir ,(or (getenv "STORE_DIR") "~/web"))))
  (message "BEGIN TO AUTO PUBLIC")
  (setq org-export-use-babel nil)
  (setq org-export-with-broken-links t)
  (setq debug-on-error t)
  (setq org-src-fontify-natively t)
  (setq org-html-htmlize-output-type 'css)
  (setq safe-local-variable-values '((org-export-use-babel . t)))
  (require 'ob-shell)
  (require 'ox-gfm)
  (require 'cl-lib)

  (condition-case err
      (ego-do-publication "blog" nil nil nil)
    (error
     (message "EGO ERROR: %s" (error-message-string err))
     (message "EGO ERROR backtrace:")
     (backtrace)))
  )