;; package.el 源配置
(require 'package)
(setq package-archives
      '(("melpa"  . "https://melpa.org/packages/")
        ("gnu"    . "https://elpa.gnu.org/packages/")
        ("nongnu" . "https://elpa.nongnu.org/nongnu/")))

;; 清华镜像（国内加速）
(setq package-archives
      '(("melpa"  . "https://mirrors.tuna.tsinghua.edu.cn/elpa/melpa/")
        ("gnu"    . "https://mirrors.tuna.tsinghua.edu.cn/elpa/gnu/")
        ("nongnu" . "https://mirrors.tuna.tsinghua.edu.cn/elpa/nongnu/")))

(package-initialize)

;; 直接安装（推荐方式）
(defvar bootstrap-version)
(let ((bootstrap-file
       (expand-file-name "straight/repos/straight.el/bootstrap.el"
                         user-emacs-directory))
      (bootstrap-version 6))
  (unless (file-exists-p bootstrap-file)
    (with-current-buffer
        (url-retrieve-synchronously
         "https://raw.githubusercontent.com/radian-software/straight.el/develop/install.el"
         'silent 'inhibit-cookies)
      (goto-char (point-max))
      (eval-print-last-sexp)))
  (load bootstrap-file nil 'nomessage))

;; 安装包
(straight-use-package 'magit)

;; 安装并配置
(straight-use-package
 '(magit :type git :host github :repo "magit/magit"))

;; 从非标准源安装
(straight-use-package
 '(my-package :type git :host github :repo "user/my-package"
              :branch "develop"))

;; 锁定版本（可复现）
;; 使用 straight.lock 文件
(straight-freeze-versions)  ; 冻结当前版本
(thaw-versions)              ; 恢复冻结版本

;; 更新所有包
(straight-pull-all)

;; 重建包
(straight-rebuild-all)

;; 最简单的用法
(use-package magit)

;; 等价于：
(require 'magit)

;; 完整语法
(use-package package-name
  :ensure t              ; 自动安装（package.el）或 straight.el
  :defer t               ; 延迟加载
  :after other-package   ; 在某个包加载后加载
  :hook (mode . func)    ; 挂钩到某个模式
  :bind ("C-c m" . cmd)  ; 绑定快捷键
  :config                ; 加载后执行
  :init                  ; 加载前执行
  :custom                ; 设置自定义变量
  :diminish              ; 在模型栏隐藏
  :commands (cmd1 cmd2)  ; 声明命令以触发加载
  :mode ("\\.ext\\'" . mode)  ; 文件关联
  :interpreter ("name" . mode) ; 解释器关联
  )

;; 1. 基本配置
(use-package which-key
  :ensure t
  :config
  (which-key-mode 1))

;; 2. 延迟加载
(use-package magit
  :ensure t
  :defer t
  :bind ("C-x g" . magit-status))

;; 3. Hook 加载
(use-package flycheck
  :ensure t
  :hook (prog-mode . flycheck-mode))

;; 4. 模式关联
(use-package web-mode
  :ensure t
  :mode ("\\.html\\'" "\\.vue\\'")
  :config
  (setq web-mode-markup-indent-offset 2))

;; 5. After 加载
(use-package evil-collection
  :ensure t
  :after evil
  :config
  (evil-collection-init))

;; 6. 自定义变量
(use-package org
  :custom
  (org-directory "~/org")
  (org-agenda-files '("~/org/agenda"))
  (org-startup-indented t))

;; 7. 绑定多个按键
(use-package avy
  :ensure t
  :bind (("C-:" . avy-goto-char)
         ("C-'" . avy-goto-char-2)
         ("M-g w" . avy-goto-word-1)))

;; 8. 隐藏模型栏标识
(use-package diminish
  :ensure t)

(use-package abbrev
  :diminish abbrev-mode)

;; 9. 条件加载
(use-package lsp-mode
  :ensure t
  :if (executable-find "pyright")
  :hook (python-mode . lsp))

;; 10. 嵌套配置
(use-package org
  :config
  (use-package org-roam
    :ensure t
    :after org
    :config
    (org-roam-db-autosync-mode)))

;; 推荐的关键字顺序
(use-package PACKAGE-NAME
  ;; 1. 加载控制
  :ensure                     ; 是否安装
  :if / :when / :unless       ; 条件加载
  :after                      ; 依赖
  :defer                      ; 延迟
  :demand                     ; 立即加载

  ;; 2. 触发加载
  :commands                   ; 命令触发
  :bind                       ; 按键触发
  :mode                       ; 文件模式触发
  :interpreter                ; 解释器触发
  :hook                       ; Hook 触发

  ;; 3. 自定义变量
  :custom                     ; 设置变量
  :custom-face                ; 设置 face

  ;; 4. 配置
  :init                       ; 加载前执行
  :config                     ; 加载后执行

  ;; 5. 显示
  :diminish                   ; 隐藏模型栏
  :delight                    ; 替换模型栏显示
  )

;; 这是目前最推荐的组合方式

;; 1. 安装 straight.el（见 12.3 节）

;; 2. 让 use-package 使用 straight.el
(straight-use-package 'use-package)
(setq straight-use-package-by-default t)

;; 3. 现在所有 use-package 调用都会通过 straight.el 安装
(use-package magit)   ; 自动从 MELPA Git 仓库安装
(use-package org-roam) ; 自动安装

;; 4. 如果需要从特定源安装
(use-package my-package
  :straight (:host github :repo "user/my-package"
             :branch "main"
             :files ("*.el" "*.org")))

;; 策略 1：手动更新（推荐）
;; 每周运行一次
;; M-x straight-pull-all  （straight.el）
;; M-x package-update-all  （package.el）

;; 策略 2：自动检查更新
(use-package auto-package-update
  :config
  (setq auto-package-update-delete-old-versions t
        auto-package-update-hide-results t)
  (auto-package-update-maybe))

;; 策略 3：Doom Emacs 方式
;; doom upgrade → 更新 Doom 和所有包