feat(emacs): org mode basic qol improvements

* CJK zero-width space
* Fonts for CJK characters
* Paste images from clipboard (org-download)
* Line-feed by default
* Visual relative line mode number (instead of physical relative)
* Treemacs: Sidebar file tree in Emacs

tools/emacs.d/lisp/init-org.el

@@ -1,12 +1,17 @@
 ;;; init-org.el
 
+;; Use =M-x org-mode-restart= to take effects
+;; After =M-x eval-buffer=
+
 (use-package org
   :ensure nil ;; Use Emacs built-in Org Mode
   :config
   (setq org-log-done 'time)
-  (setq org-startup-indented nil)
+  (setq org-startup-indented t)
   ;; Use inline image
   (setq org-startup-with-inline-images t)
+  (setq org-display-remote-inline-images 'cache) ; 预览网络图片
+
   ;; Use LaTeX rendering
   (setq org-startup-with-latex-preview t)
   (setq org-image-actual-width 600)
@@ -24,6 +29,16 @@
     (evil-define-key 'normal org-mode-map (kbd "SPC a") 'org-agenda-list) ; TODO: Here Simulates the leader
   )
 
+
+;; Set Org Styles
+(setq org-emphasis-alist
+  '(("*" (bold :foreground "cyan" ))
+    ("/" (italic :foreground "green"))
+    ("_" underline)
+    ("=" (org-verbatim verbatim :background "maroon" :foreground "white"))
+    ("~" (org-code verbatim :background "deep sky blue" :foreground "MidnightBlue"))
+    ("+" (:strike-through t))))
+
 (use-package org-bullets
   :after org
   :hook (org-mode . org-bullets-mode))
@@ -44,8 +59,9 @@
 
 (org-babel-do-load-languages
  'org-babel-load-languages
- '( 
+ '(
    (python . t) ; No need to declare C/C++/emacs-lisp since is integrated
+   (shell . t)
    ))
 ;; Use clang as default C/C++ Compiler (Easier to install and configure in Windows)
 (setq org-babel-C-compiler "clang")
@@ -53,5 +69,40 @@
 ;; Don't ask me again when running source block
 (setq org-confirm-babel-evaluate nil)
 
+;; Pasting Images
+;; Use =M-x org-download-clipboard= to paste image
+;; Additional program required: magick
+;; Windows: scoop install imagemagick
+;; org-download config
+(use-package org-download
+  :ensure t
+  :after org
+  :config
+  ;; Hardcoding the image dir
+  (setq-default org-download-image-dir "~/OrgFiles/Attachments")
+
+  (setq org-download-heading-lvl nil ; don't use heading when creating files
+        org-download-timestamp "%Y%m%d-%H%M%S"
+        org-download-screenshot-method "screencapture -i %s"  ; for macOS only
+        org-download-backend 'curl) ; use curl to `download` image
+
+  (org-download-enable)
+
+  :bind (:map org-mode-map
+         ("C-c d c" . org-download-clipboard)    ; 粘贴剪贴板内容
+         ("C-c d s" . org-download-screenshot))) ; 截图
+
+
+;; For CJK users
+;; Insert zero width space around the emphasis symbols, this might be useful for
+;; languages that does not rely on space
+(defun my/insert-emphasis-with-zws (char)
+  (interactive "c")
+  (insert ?\u200B char)
+  (save-excursion (insert char ?\u200B)))
+
+(global-set-key (kbd "C-c b") (lambda () (interactive) (my/insert-emphasis-with-zws ?*)))
+(global-set-key (kbd "C-c i") (lambda () (interactive) (my/insert-emphasis-with-zws ?/)))
+
 
 (provide 'init-org)