ubuntu 下emacs 配置

時間  2019-12-11
標籤 ubuntu emacs 配置 欄目 Ubuntu 简体版
原文   原文鏈接
    1. (set-language-environment 'Chinese-GB)
    2. (set-keyboard-coding-system 'utf-8)
    3. (set-clipboard-coding-system 'utf-8)
    4. (set-terminal-coding-system 'utf-8)
    5. (set-buffer-file-coding-system 'utf-8)
    6. (set-default-coding-systems 'utf-8)
    7. (set-selection-coding-system 'utf-8)
    8. (modify-coding-system-alist 'process "*" 'utf-8)
    9. (setq default-process-coding-system '(utf-8 . utf-8))
    10. (setq-default pathname-coding-system 'utf-8)
    11. (set-file-name-coding-system 'utf-8)
    12. (setq ansi-color-for-comint-mode t)
    13. ;;處理shell-mode亂碼,好像沒做用
    15. ;;------語言環境字符集設置結束------------
    17. ;;--------------窗口界面設置------------------
    19. (set-foreground-color "grey")
    20. (set-background-color "black")
    21. (set-cursor-color "gold1")
    22. (set-mouse-color "gold1")
    24. (set-scroll-bar-mode nil)
    25. ;;取消滾動欄
    27. ;;(customize-set-variable 'scroll-bar-mode 'right))
    28. ;;設置滾動欄在窗口右側，而默認是在左側
    30. (tool-bar-mode nil)
    31. ;;取消工具欄
    33. ;;啓動設置
    34. (setq default-frame-alist
    35.              '((vertical-scroll-bars)
    36.                (top . 25)
    37.                (left . 45)
    38.                (width . 120)
    39.                (height . 40)
    40.                (background-color . "black")
    41.                (foreground-color . "grey")
    42.                (cursor-color . "gold1")
    43.                (mouse-color . "gold1")
    44.                (tool-bar-lines . 0)
    45.                (menu-bar-lines . 1)
    46.                (right-fringe)
    47.                (left-fringe)))
    49. ;;啓動自動最大化(數據本身調整，注意格式，如(top . 0)，圓點先後都要留有空格)
    50. ;;(setq initial-frame-alist '((top . 0) (left . 0) (width . 142) (height . 49)))
    53. ;; 設置另一些顏色：語法高亮顯示的背景和主題，區域選擇的背景和主題，二次選擇的背景和選擇
    54. (set-face-foreground 'highlight "white")
    55. (set-face-background 'highlight "blue")
    56. (set-face-foreground 'region "cyan")
    57. (set-face-background 'region "blue")
    58. (set-face-foreground 'secondary-selection "skyblue")
    59. (set-face-background 'secondary-selection "darkblue")
    61. ;;------------窗口界面設置結束-----------------
    63. ;;------------顯示時間設置------------------------------
    65. (display-time-mode 1);;啓用時間顯示設置，在minibuffer上面的那個槓上
    66. (setq display-time-24hr-format t);;時間使用24小時制
    67. (setq display-time-day-and-date t);;時間顯示包括日期和具體時間
    68. (setq display-time-use-mail-icon t);;時間欄旁邊啓用郵件設置
    69. (setq display-time-interval 10);;時間的變化頻率，單位多少來着？
    71. ;;------------顯示時間設置結束--------------
    73. ;;------------定製操做習慣--------------------
    75. ;;設置打開文件的缺省路徑
    76. (setq default-directory "~/")
    78. ;;ido的配置,這個可使你在用C-x C-f打開文件的時候在後面有提示;
    79. ;;這裏是直接打開了ido的支持，在emacs23中這個是自帶的.
    80. (ido-mode t)
    82. (setq ido-save-directory-list-file nil)
    83. ;;ido模式中不保存目錄列表,解決退出Emacs時ido要詢問編碼的問題。
    85. (setq visible-bell t)
    86. ;;關閉煩人的出錯時的提示聲
    88. (setq inhibit-startup-message t)
    89. ;;關閉emacs啓動時的畫面
    91. (setq gnus-inhibit-startup-message t)
    92. ;;關閉gnus啓動時的畫面
    94. (fset 'yes-or-no-p 'y-or-n-p)
    95. ;; 改變 Emacs 執拗的要你回答 yes 的行爲。按 y 或空格鍵表示 yes，n 表示 no。
    97. (setq font-lock-maximum-decoration t)
    98. (setq font-lock-global-modes '(not shell-mode text-mode))
    99. (setq font-lock-verbose t)
    100. (setq font-lock-maximum-size '((t . 1048576) (vm-mode . 5250000)))
    101. ;; 語法高亮。除 shell-mode 和 text-mode 以外的模式中使用語法高亮。
    103. (setq column-number-mode t)
    104. (setq line-number-mode t)
    105. ;;顯示行列號
    106. (global-linum-mode t)
    107. (setq mouse-yank-at-point t)
    108. ;;不要在鼠標點擊的那個地方插入剪貼板內容。我不喜歡那樣，常常把個人文檔搞的一團糟。我以爲先用光標定位，而後鼠標中鍵點擊要好的多。無論你的光標在文檔的那個位置，或是在 minibuffer，鼠標中鍵一點擊，X selection 的內容就被插入到那個位置。
    110. (setq kill-ring-max 200)
    111. ;;設置粘貼緩衝條目數量.用一個很大的kill ring(最多的記錄個數). 這樣防止我不當心刪掉重要的東西
    113. (setq-default auto-fill-function 'do-auto-fill)
    114.  ; Autofill in all modes;;
    115. (setq default-fill-column 120)
    116. ;;把 fill-column 設爲 60. 這樣的文字更好讀
    118. (setq-default indent-tabs-mode nil)
    119. (setq default-tab-width 8);;tab鍵爲8個字符寬度
    120. (setq tab-stop-list ())
    121. ;;不用 TAB 字符來indent, 這會引發不少奇怪的錯誤。編輯 Makefile 的時候也不用擔憂，由於 makefile-mode 會把 TAB 鍵設置成真正的 TAB 字符，而且加亮顯示的。
    123. (setq sentence-end "\\([。！？]\\|……\\|[.?!][]\"')}]*\\($\\|[ \t]\\)\\)[ \t\n]*")
    124. (setq sentence-end-double-space nil)
    125. ;;設置 sentence-end 能夠識別中文標點。不用在 fill 時在句號後插入兩個空格。
    127. (setq enable-recursive-minibuffers t)
    128. ;;能夠遞歸的使用 minibuffer
    130. (setq scroll-margin 3 scroll-conservatively 10000)
    131. ;;防止頁面滾動時跳動， scroll-margin 3 能夠在靠近屏幕邊沿3行時就開始滾動，能夠很好的看到上下文。
    133. (setq default-major-mode 'text-mode)
    134. (add-hook 'text-mode-hook 'turn-on-auto-fill)
    135. ;;設置缺省主模式是text，,並進入auto-fill次模式.而不是基本模式fundamental-mode
    137. (show-paren-mode t)
    138. ;;打開括號匹配顯示模式
    140. (setq show-paren-style 'parenthesis)
    141. ;;括號匹配時能夠高亮顯示另一邊的括號，但光標不會煩人的跳到另外一個括號處。
    143. (mouse-avoidance-mode 'animate)
    144. ;;光標靠近鼠標指針時，讓鼠標指針自動讓開，別擋住視線。
    146. (setq frame-title-format "emacs@%b")
    147. ;;在標題欄顯示buffer的名字，而不是 emacs@wangyin.com 這樣沒用的提示。
    149. (setq uniquify-buffer-name-style 'forward);;好像沒起做用
    150. ;; 當有兩個文件名相同的緩衝時，使用前綴的目錄名作 buffer 名字，不用原來的foobar 形式。
    152. (setq auto-image-file-mode t)
    153. ;;讓 Emacs 能夠直接打開和顯示圖片。
    155. ;(auto-compression-mode 1)
    156. ;打開壓縮文件時自動解壓縮。
    158. (setq global-font-lock-mode t)
    159. ;;進行語法加亮。
    161. (setq-default kill-whole-line t)
    162. ;; 在行首 C-k 時，同時刪除該行。
    164. (add-hook 'comint-output-filter-functions
    165.       'comint-watch-for-password-prompt)
    166. ;;當你在shell、telnet、w3m等模式下時，必然碰到過要輸入密碼的狀況,此時加密顯出你的密碼
    168. ;;(setq version-control t);;啓用版本控制，便可以備份屢次
    169. ;; (setq kept-old-versions 2);;備份最原始的版本兩次，及第一次編輯前的文檔，和第二次編輯前的文檔
    170. ;; (setq kept-new-versions 1);;備份最新的版本1次，理解同上
    171. ;; (setq delete-old-versions t);;刪掉不屬於以上3中版本的版本
    172. ;; (setq backup-directory-alist '(("." . "~/backups")));;設置備份文件的路徑
    173. ;; (setq backup-by-copying t);;備份設置方法，直接拷貝
    174. ;; Emacs 中，改變文件時，默認都會產生備份文件(以 ~ 結尾的文件)。能夠徹底去掉; (並不可取)，也能夠制定備份的方式。這裏採用的是，把全部的文件備份都放在一個固定的地方("~/backups")。對於每一個備份文件，保留最原始的兩個版本和最新的1個版本。而且備份的時候，備份文件是複本，而不是原件。
    176. (setq make-backup-files nil)
    177. ;; 設定不產生備份文件
    179. ;;(setq auto-save-mode nil)
    180. ;;自動保存模式
    182. (setq-default make-backup-files nil)
    183. ;; 不生成臨時文件
    185. (put 'scroll-left 'disabled nil) ;容許屏幕左移
    186. (put 'scroll-right 'disabled nil) ;容許屏幕右移
    187. (put 'set-goal-column 'disabled nil)
    188. (put 'narrow-to-region 'disabled nil)
    189. (put 'upcase-region 'disabled nil)
    190. (put 'downcase-region 'disabled nil)
    191. (put 'LaTeX-hide-environment 'disabled nil)
    192. ;;把這些缺省禁用的功能打開。
    194. ;;容許emacs和外部其餘程序的粘貼
    195. (setq x-select-enable-clipboard t)
    197. ;;(setq mouse-yank-at-point t)
    198. ;;使用鼠標中鍵能夠粘貼
    200. (setq user-full-name "Bluesky")
    201. (setq user-mail-address "whuchenxi2010@gmail.com")
    202. ;;設置有用的我的信息,這在不少地方有用。
    204. (setq require-final-newline t)
    205. ;; 自動的在文件末增長一新行
    207. (setq-default transient-mark-mode t)
    208. ;;Non-nil if Transient-Mark mode is enabled.
    210. (setq track-eol t)
    211. ;; 當光標在行尾上下移動的時候，始終保持在行尾。
    213. (setq Man-notify-method 'pushy)
    214. ;; 當瀏覽 man page 時，直接跳轉到 man buffer。
    216. ;;(setq next-line-add-newlines nil)
    217. ;;Emacs 21 中已是缺省設置。按 C-n 或向下鍵時不添加新行。
    219. (global-set-key [home] 'beginning-of-buffer)
    220. (global-set-key [end] 'end-of-buffer)
    221. ;;設置home鍵指向buffer開頭，end鍵指向buffer結尾
    224. (global-set-key (kbd "C-,") 'scroll-left)
    225. ;; "C-,"設爲屏幕左移命令
    226. (global-set-key (kbd "C-.") 'scroll-right)
    227. ;; "C-."設爲屏幕右移命令
    229. (global-set-key [f1] 'manual-entry)
    230. (global-set-key [C-f1] 'info )
    232. ;;(global-set-key [f2] 'emacs-wiki-find-file)
    233. ;;打開wiki
    235. ;;(global-set-key [f3] 'repeat-complex-command)
    237. ;;(global-set-key [f4] 'other-window)
    238. ;; 跳轉到 Emacs 的另外一個buffer窗口
    240. (defun du-onekey-compile ()
    241.   "Save buffers and start compile"
    242.   (interactive)
    243.   (save-some-buffers t)
    244.   (switch-to-buffer-other-window "*compilation*")
    245.   (compile compile-command))
    246.   (global-set-key [C-f5] 'compile)
    247.   (global-set-key [f5] 'du-onekey-compile)
    248. ;; C-f5, 設置編譯命令; f5, 保存全部文件而後編譯當前窗口文件
    250. (global-set-key [f6] 'gdb)
    251. ;;F6設置爲在Emacs中調用gdb
    253. (global-set-key [C-f7] 'previous-error)
    254. (global-set-key [f7] 'next-error)
    256. (defun open-eshell-other-buffer ()
    257.   "Open eshell in other buffer"
    258.   (interactive)
    259.   (split-window-vertically)
    260.   (eshell))
    261. (global-set-key [(f8)] 'open-eshell-other-buffer)
    262. (global-set-key [C-f8] 'eshell)
    263. ;;目的是開一個shell的小buffer，用於更方便地測試程序(也就是運行程序了)，我常常會用到。
    264. ;;f8就是另開一個buffer而後打開shell，C-f8則是在當前的buffer打開shell
    266. (setq speedbar-show-unknown-files t);;能夠顯示全部目錄以及文件
    267. (setq dframe-update-speed nil);;不自動刷新，手動 g 刷新
    268. (setq speedbar-update-flag nil)
    269. (setq speedbar-use-images nil);;不使用 image 的方式
    270. (setq speedbar-verbosity-level 0)
    272. (global-set-key [f9] 'speedbar)
    273. ;;設置f9調用speedbar命令
    274. ;;使用 n 和 p 能夠上下移動，
    275. ;; + 展開目錄或文件進行瀏覽，- 收縮，RET 訪問目錄或文件，g 更新 speedbar。
    277. (setq dired-recursive-copies 'top)
    278. (setq dired-recursive-deletes 'top)
    279. ;;讓 dired 能夠遞歸的拷貝和刪除目錄。
    280. (global-set-key [C-f9] 'dired)
    281. ;;設置[C-f9]爲調用dired命令
    283. (global-set-key [f10] 'undo)
    284. ;;設置F10爲撤銷
    286. (global-set-key [f11] 'calendar)
    287. ;;設置F11快捷鍵指定Emacs 的日曆系統
    289. (global-set-key [f12] 'list-bookmarks)
    290. ;;設置F12 快速察看日程安排
    292. (setq time-stamp-active t)
    293. (setq time-stamp-warn-inactive t)
    294. (setq time-stamp-format "%:y-%02m-%02d %3a %02H:%02M:%02S chunyu")
    295. ;; 設置時間戳，標識出最後一次保存文件的時間。
    297. (global-set-key (kbd "M-g") 'goto-line)
    298. ;;設置M-g爲goto-line
    300. (global-set-key (kbd "C-SPC") 'nil)
    301. ;;取消control+space鍵設爲mark
    303. (global-set-key (kbd "s-SPC") 'set-mark-command)
    304. ;;用win+space鍵來set-mark，這樣，C-SPC就能夠用來調用外部輸入法了。
    306. ;;----------定製操做習慣結束-------------
    308. ;;----------日曆設置--------------------
    310. ;;設置日曆的一些顏色
    311. (setq calendar-load-hook
    312. '(lambda ()
    313. (set-face-foreground 'diary-face "skyblue")
    314. (set-face-background 'holiday-face "slate blue")
    315. (set-face-foreground 'holiday-face "white")))
    317. ;;設置我所在地方的經緯度，calendar裏有個功能是日月食的預測，和你的經緯度相聯繫的。
    318. ;; 讓emacs能計算日出日落的時間，在 calendar 上用 S 便可看到
    319. (setq calendar-latitude +39.54)
    320. (setq calendar-longitude +116.28)
    321. (setq calendar-location-name "北京")
    323. ;; 設置陰曆顯示，在 calendar 上用 pC 顯示陰曆
    324. (setq chinese-calendar-celestial-stem
    325.   ["甲" "乙" "丙" "丁" "戊" "己" "庚" "辛" "壬" "癸"])
    326. (setq chinese-calendar-terrestrial-branch
    327.   ["子" "醜" "寅" "卯" "辰" "巳" "戊" "未" "申" "酉" "戌" "亥"])
    329. ;; 設置 calendar 的顯示
    330. (setq calendar-remove-frame-by-deleting t)
    331. (setq calendar-week-start-day 1) ; 設置星期一爲每週的第一天
    332. (setq mark-diary-entries-in-calendar t) ; 標記calendar上有diary的日期
    333. (setq mark-holidays-in-calendar nil) ; 爲了突出有diary的日期，calendar上不標記節日
    334. (setq view-calendar-holidays-initially nil) ; 打開calendar的時候不顯示一堆節日
    336. ;; 去掉不關心的節日，設定本身在乎的節日，在 calendar 上用 h 顯示節日
    337. (setq christian-holidays nil)
    338. (setq hebrew-holidays nil)
    339. (setq islamic-holidays nil)
    340. (setq solar-holidays nil)
    341. (setq general-holidays '((holiday-fixed 1 1 "元旦")
    342.                          (holiday-fixed 2 14 "情人節")
    343.                          (holiday-fixed 3 14 "白色情人節")
    344.                          (holiday-fixed 4 1 "愚人節")
    345.                          (holiday-fixed 5 1 "勞動節")
    346.                          (holiday-float 5 0 2 "母親節")
    347.                          (holiday-fixed 6 1 "兒童節")
    348.                          (holiday-float 6 0 3 "父親節")
    349.                          (holiday-fixed 7 1 "建黨節")
    350.                          (holiday-fixed 8 1 "建軍節")
    351.                          (holiday-fixed 9 10 "教師節")
    352.                          (holiday-fixed 10 1 "國慶節")
    353.                          (holiday-fixed 12 25 "聖誕節")))
    355. ;;Calendar模式支持各類方式來更改當前日期
    356. ;;（這裏的「前」是指尚未到來的那一天，「後」是指已通過去的日子）
    357. ;; q 退出calendar模式
    358. ;; C-f 讓當前日期向前一天
    359. ;; C-b 讓當前日期向後一天
    360. ;; C-n 讓當前日期向前一週
    361. ;; C-p 讓當前日期向後一週
    362. ;; M-} 讓當前日期向前一個月
    363. ;; M-{ 讓當前日期向後一個月
    364. ;; C-x ] 讓當前日期向前一年
    365. ;; C-x [ 讓當前日期向後一年
    366. ;; C-a 移動到當前周的第一天
    367. ;; C-e 移動到當前周的最後一天
    368. ;; M-a 移動到當前月的第一天
    369. ;; M-e 多動到當前月的最後一天
    370. ;; M-< 移動到當前年的第一天
    371. ;; M-> 移動到當前年的最後一天
    373. ;;Calendar模式支持移動多種移動到特珠日期的方式
    374. ;; g d 移動到一個特別的日期
    375. ;; o 使某個特殊的月分做爲中間的月分
    376. ;; . 移動到當天的日期
    377. ;; p d 顯示某一天在一年中的位置，也顯示本年度還有多少天。
    378. ;; C-c C-l 刷新Calendar窗口
    380. ;; Calendar支持生成LATEX代碼。
    381. ;; t m 按月生成日曆
    382. ;; t M 按月生成一個美化的日曆
    383. ;; t d 按當天日期生成一個當天日曆
    384. ;; t w 1 在一頁上生成這個周的日曆
    385. ;; t w 2 在兩頁上生成這個周的日曆
    386. ;; t w 3 生成一個ISO-SYTLE風格的當前週日歷
    387. ;; t w 4 生成一個從週一開始的當前週日歷
    388. ;; t y 生成當前年的日曆
    390. ;;EMACS Calendar支持配置節日：
    391. ;; h 顯示當前的節日
    392. ;; x 定義當天爲某個節日
    393. ;; u 取消當天已被定義的節日
    394. ;; e 顯示全部這先後共三個月的節日。
    395. ;; M-x holiday 在另外的窗口的顯示這先後三個月的節日。
    398. ;; 另外，還有一些特殊的，有意思的命令：
    399. ;; S 顯示當天的日出日落時間(是大寫的S)
    400. ;; p C 顯示農曆可使用
    401. ;; g C 使用農曆移動日期可使用
    403. ;;-----------日曆設置結束----------------
    404. ;;-----------日記設置---------------------
    406. (setq diary-file "~/diary/diary");; 默認的日記文件
    407. (setq diary-mail-addr "whuchenxi2010@gmail.com")
    408. ;;(add-hook 'diary-hook 'appt-make-list)
    409. ;;當你建立了一個'~/diary'文件，你就可使用calendar去查看裏面的內容。你能夠查看當天的事件，相關命令以下 ：
    410. ;; d 顯示被選中的日期的全部事件
    411. ;; s 顯示全部事件，包括過時的，未到期的等等
    413. ;; 建立一個事件的樣例：
    414. ;; 02/11/1989
    415. ;; Bill B. visits Princeton today
    416. ;; 2pm Cognitive Studies Committee meeting
    417. ;; 2:30-5:30 Liz at Lawrenceville
    418. ;; 4:00pm Dentist appt
    419. ;; 7:30pm Dinner at George's
    420. ;; 8:00-10:00pm concert
    422. ;; 建立事件的命令：
    423. ;; i d 爲當天日期添加一個事件
    424. ;; i w 爲當天周建立一個周事件
    425. ;; i m 爲當前月建立一個月事件
    426. ;; i y 爲當前年建立一個年事件
    427. ;; i a 爲當前日期建立一個週年記念日
    428. ;; i c 建立一個循環的事件
    430. ;;----------日記設置結束-----------------
    433. ;;-------------方便編程操做設置----------------
    435. ;;代碼摺疊
    436. (load-library "hideshow")
    437. (add-hook 'c-mode-hook 'hs-minor-mode)
    438. (add-hook 'c++-mode-hook 'hs-minor-mode)
    439. (add-hook 'java-mode-hook 'hs-minor-mode)
    440. (add-hook 'perl-mode-hook 'hs-minor-mode)
    441. (add-hook 'php-mode-hook 'hs-minor-mode)
    442. (add-hook 'emacs-lisp-mode-hook 'hs-minor-mode)
    443. ;;能把一個代碼塊縮起來，須要的時候再展開
    444. ;; M-x hs-minor-mode
    445. ;; C-c @ ESC C-s show all
    446. ;; C-c @ ESC C-h hide all
    447. ;; C-c @ C-s show block
    448. ;; C-c @ C-h hide block
    449. ;; C-c @ C-c toggle hide/show
    452. ;;自動補全括號
    453. (defun my-c-mode-auto-pair ()
    454.   (interactive)
    455.   (make-local-variable 'skeleton-pair-alist)
    456.   (setq skeleton-pair-alist '(
    457.     (?` ?` _ "''")
    458.     (?\( ? _ " )")
    459.     (?\[ ? _ " ]")
    460.     (?{ \n > _ \n ?} >)))
    461.   (setq skeleton-pair t)
    462.   (local-set-key (kbd "(") 'skeleton-pair-insert-maybe)
    463.   (local-set-key (kbd "{") 'skeleton-pair-insert-maybe)
    464.   (local-set-key (kbd "`") 'skeleton-pair-insert-maybe)
    465.   (local-set-key (kbd "[") 'skeleton-pair-insert-maybe))
    466. (add-hook 'c-mode-hook 'my-c-mode-auto-pair)
    467. (add-hook 'c++-mode-hook 'my-c-mode-auto-pair)
    468. ;;輸入左邊的括號，就會自動補全右邊的部分.包括(), "", [] , {} , 等等。
    470. ;;把c語言風格設置爲k&r風格
    471. (add-hook 'c-mode-hook
    472. '(lambda ()
    473. (c-set-style "k&r")))
    475. (autoload 'css-mode "css-mode" "CSS editing mode" t)
    476. ;;css-mode.el編輯css文件
    478. (autoload 'htmlize-buffer "htmlize" "HTMLize mode" t)
    479. ;;把buffer的內容連同顏色轉爲html格式
    481. (autoload 'folding-mode "folding" "Folding mode" t)
    482. (autoload 'turn-off-folding-mode "folding" "Folding mode" t)
    483. (autoload 'turn-on-folding-mode "folding" "Folding mode" t)
    484. ;;folding.el 編輯文本的一部分，其它部分摺疊起來
    486. (setq auto-mode-alist
    487.       ;; 將文件模式和文件後綴關聯起來
    488.       (append '(("\\.py\\'" . python-mode)
    489.                 ("\\.s?html?\\'" . html-helper-mode)
    490.                 ("\\.asp\\'" . html-helper-mode)
    491.                 ("\\.phtml\\'" . html-helper-mode)
    492.                 ("\\.css\\'" . css-mode))              auto-mode-alist));;------------方便編程操做設置結束--------------------
相關文章
相關標籤/搜索
每日一句
    每一个你不满意的现在，都有一个你没有努力的曾经。
本站公眾號
   歡迎關注本站公眾號,獲取更多信息
聯繫我們 最近搜索 最新文章 沪ICP备13005482号-10 MyBatis教程 SQL 教程 MySQL教程 Java 教程 Thymeleaf 教程 Hibernate教程 Spring教程 Redis教程