emacs could not display Chinese

flyinflash

It give a warning:

1. 
   
2. Warning: no fonts matching `-*-fixed-medium-r-normal-*-16-*-*-*-*-*-iso8859-1' available [2 times]
   

复制代码

1. 
   
2. cat .emacs
   

复制代码

1. 
   
2. ;; --------------------------------------------------------------------------
   
3. ;; eim chinese input mehod
   
4. ;; --------------------------------------------------------------------------
   
5. 
   
6. (add-to-list 'load-path "~/.emacs.d/site-lisp/eim")
   
7. (autoload 'eim-use-package "eim" "Another emacs input method")
   
8. 
   
9. ;; testing *FEATURE* tooltip
   
10. (setq eim-use-tooltip nil)
    
11. 
    
12. (register-input-method
    
13. "eim-wb" "euc-cn" 'eim-use-package
    
14. "五笔" "汉字五笔输入法" "wb.txt")
    
15. (register-input-method
    
16. "eim-py" "euc-cn" 'eim-use-package
    
17. "拼音" "汉字拼音输入法" "py.txt")
    
18. 
    
19. ;; input English with ';' temporary
    
20. (require 'eim-extra)
    
21. (global-set-key ";" 'eim-insert-ascii)
    
22. 
    
23. ;; eim-wb page
    
24. (add-hook 'eim-wb-load-hook
    
25.           (lambda ()
    
26.             (let ((map (eim-mode-map)))
    
27.               (define-key map "-" 'eim-previous-page)
    
28.               (define-key map "=" 'eim-next-page))))
    
29. 
    
30. (add-hook 'eim-wb-load-hook
    
31.           (lambda ()
    
32.             (let ((map (eim-mode-map)))
    
33.               (define-key map "," 'eim-previous-page)
    
34.               (define-key map "." 'eim-next-page))))
    
35. 
    
36. ;; eim-py page
    
37. (add-hook 'eim-py-load-hook
    
38.           (lambda ()
    
39.             (let ((map (eim-mode-map)))
    
40.               (define-key map "-" 'eim-previous-page)
    
41.               (define-key map "=" 'eim-next-page))))
    
42. 
    
43. (add-hook 'eim-py-load-hook
    
44.           (lambda ()
    
45.             (let ((map (eim-mode-map)))
    
46.               (define-key map "," 'eim-previous-page)
    
47.               (define-key map "." 'eim-next-page))))
    
48. 
    
49. ;; --------------------------------------------------------------------------
    
50. ;; shortcuts
    
51. ;; --------------------------------------------------------------------------
    
52. 
    
53. ;; F7 compile
    
54. (global-set-key [(f7)] 'compile)
    
55. 
    
56. ;; F12-c calendar
    
57. (global-set-key (kbd "<f12> c") 'calendar)
    
58. 
    
59. ;; F2 wiki-mode
    
60. (global-set-key [(f2)] 'emacs-wiki-find-file)
    
61. 
    
62. ;; F4 shell-Mode
    
63. (global-set-key [(f4)] 'ansi-term)
    
64. 
    
65. ;; F9 list bookmarks
    
66. (global-set-key (kbd "<f9>") 'list-bookmarks)
    
67. 
    
68. ;; --------------------------------------------------------------------------
    
69. ;; theme
    
70. ;; --------------------------------------------------------------------------
    
71. 
    
72. ;; cursor color
    
73. ;; seems not working, add it at the bottom
    
74. (set-cursor-color "white")
    
75. 
    
76. ;; mouse color
    
77. (set-mouse-color "white")
    
78. 
    
79. ;; cursor type
    
80. ;; (set-default 'cursor-type 'bar)
    
81. (setq-default cursor-type 'box)
    
82. 
    
83. ;; fg & bg color
    
84. ;; (set-foreground-color "#FDFF00")
    
85. ;; (set-foreground-color "#00FF00")
    
86. (set-foreground-color "#CCCCCC")
    
87. (set-background-color "#343434")
    
88. 
    
89. ;; highlight theme
    
90. (set-face-foreground 'highlight "white")
    
91. (set-face-background 'highlight "blue")
    
92. 
    
93. ;; region theme
    
94. (set-face-foreground 'region "cyan")
    
95. (set-face-background 'region "blue")
    
96. 
    
97. ;; secondary selection theme
    
98. (set-face-foreground 'secondary-selection "skyblue")
    
99. (set-face-background 'secondary-selection "darkblue")
    
100. 
     
101. ;; calendar color
     
102. (setq calendar-load-hook
     
103. '(lambda ()
     
104. (set-face-foreground 'diary-face "skyblue")
     
105. (set-face-background 'holiday-face "slate blue")
     
106. (set-face-foreground 'holiday-face "white")))
     
107. 
     
108. ;; --------------------------------------------------------------------------
     
109. ;; custom user interface
     
110. ;; --------------------------------------------------------------------------
     
111. 
     
112. ;; remove startup
     
113. (setq inhibit-startup-message t)
     
114. 
     
115. ;; remove scrollbar
     
116. (set-scroll-bar-mode nil)
     
117. 
     
118. 
     
119. ;; remove toolbar
     
120. (tool-bar-mode nil)
     
121. 
     
122. ;; show path
     
123. (setq frame-title-format "lee@%b")
     
124. 
     
125. ;; image enable
     
126. (auto-image-file-mode t)
     
127. 
     
128. ;; show column number
     
129. (column-number-mode t)
     
130. 
     
131. ;; highlight matched brackets
     
132. (show-paren-mode t)
     
133. 
     
134. ;; display time
     
135. (display-time-mode 1)
     
136. (setq display-time-24hr-format t)
     
137. (setq display-time-day-and-date t)
     
138. 
     
139. ;; --------------------------------------------------------------------------
     
140. ;; misc
     
141. ;; --------------------------------------------------------------------------
     
142. 
     
143. ;; sudo
     
144. ;; tramp means: Transparent Remote (file) Access, Multiple Protocol,
     
145. (require 'tramp)
     
146. 
     
147. 
     
148. ;; default mode is text-mode
     
149. (setq default-major-mode 'text-mode);
     
150. 
     
151. ;; syntax highlight
     
152. (global-font-lock-mode t)
     
153. 
     
154. ;; support X paste
     
155. (setq x-select-enable-clipboard t)
     
156. 
     
157. ;; auto line break
     
158. ;; (setq default-fill-column 80)
     
159. 
     
160. ;; no backup file
     
161. (setq-default make-backup-files nil)
     
162. 
     
163. ;; move mouse while cursor close to mouse
     
164. (mouse-avoidance-mode 'animate)
     
165. (transient-mark-mode t);
     
166. 
     
167. ;; remove bell
     
168. (setq visible-bell t)
     
169. 
     
170. ;; use `y/n` instead of `yes/no`
     
171. (fset 'yes-or-no-p 'y-or-n-p)
     
172. 
     
173. ;; default work DIR
     
174. ;; (setq default-directory "/home/yuki/shuge/s/")
     
175. 
     
176. ;; --------------------------------------------------------------------------
     
177. ;; tab
     
178. ;; --------------------------------------------------------------------------
     
179. 
     
180. (setq indent-tabs-mode nil)
     
181. ;; (setq tab-stop-list ())
     
182. (setq default-tab-width 4)
     
183. (setq tab-width 4)
     
184. ;; (setq-default indent-tabs-mode t)
     
185. (setq-default indent-tabs-mode nil)
     
186. 
     
187. ;; --------------------------------------------------------------------------
     
188. ;; tab
     
189. ;; for C Programming
     
190. ;; --------------------------------------------------------------------------
     
191. 
     
192. (setq indent-tabs-mode nil)
     
193. (setq default-tab-width 4)
     
194. (setq tab-width 4)
     
195. (setq tab-stop-list ())
     
196. (loop for x downfrom 40 to 1 do
     
197.       (setq tab-stop-list (cons (* x 4) tab-stop-list)))
     
198. 
     
199. (defconst my-c-style
     
200.   '((c-tab-always-indent        . t)
     
201.     (c-comment-only-line-offset . 4)
     
202.     (c-hanging-braces-alist     . ((substatement-open after)
     
203.                                    (brace-list-open)))
     
204.     (c-hanging-colons-alist     . ((member-init-intro before)
     
205.                                    (inher-intro)
     
206.                                    (case-label after)
     
207.                                    (label after)
     
208.                                    (access-label after)))
     
209.     (c-cleanup-list             . (scope-operator
     
210.                                    empty-defun-braces
     
211.                                    defun-close-semi))
     
212.     (c-offsets-alist            . ((arglist-close . c-lineup-arglist)
     
213.                                    (substatement-open . 0)
     
214.                                    (case-label        . 4)
     
215.                                    (block-open        . 0)
     
216.                                    (knr-argdecl-intro . -)))
     
217.     (c-echo-syntactic-information-p . t)
     
218.     )
     
219.   "My C Programming Style")
     
220. 
     
221. ;; offset customizations not in my-c-style
     
222. (setq c-offsets-alist '((member-init-intro . ++)))
     
223. 
     
224. ;; Customizations for all modes in CC Mode.
     
225. (defun my-c-mode-common-hook ()
     
226.   ;; add my personal style and set it for the current buffer
     
227.   (c-add-style "PERSONAL" my-c-style t)
     
228.   ;; other customizations
     
229.   (setq tab-width 4
     
230.         ;; this will make sure spaces are used instead of tabs
     
231.         indent-tabs-mode nil)
     
232.   ;; we like auto-newline and hungry-delete
     
233.   (c-toggle-auto-hungry-state 1)
     
234.   ;; key bindings for all supported languages.  We can put these in
     
235.   ;; c-mode-base-map because c-mode-map, c++-mode-map, objc-mode-map,
     
236.   ;; java-mode-map, idl-mode-map, and pike-mode-map inherit from it.
     
237.   (define-key c-mode-base-map "\C-m" 'c-context-line-break)
     
238.   )
     
239. 
     
240. (add-hook 'c-mode-common-hook 'my-c-mode-common-hook)
     
241. 
     
242. ;; --------------------------------------------------------------------------
     
243. ;; auto-complete
     
244. ;; --------------------------------------------------------------------------
     
245. 
     
246. ;; part I
     
247. 
     
248. (global-set-key "\M- " 'hippie-expand)
     
249. (setq hippie-expand-try-functions-list
     
250.    '(try-complete-file-name-partially
     
251.      try-complete-file-name
     
252.      try-expand-all-abbrevs
     
253.      try-expand-list
     
254.      try-expand-line
     
255.      try-expand-dabbrev
     
256.      try-expand-dabbrev-all-buffers
     
257.      try-expand-dabbrev-from-kill
     
258.      try-complete-lisp-symbol-partially
     
259.      try-complete-lisp-symbol))
     
260. 
     
261. ;; part II
     
262. 
     
263. (defun my-indent-or-complete ()
     
264.    (interactive)
     
265.    (if (looking-at "\\>")
     
266.           (hippie-expand nil)
     
267.           (indent-for-tab-command))
     
268. )
     
269. 
     
270. (global-set-key [(control tab)] 'my-indent-or-complete)
     
271. 
     
272. (autoload 'senator-try-expand-semantic "senator")
     
273. 
     
274. (setq hippie-expand-try-functions-list
     
275.           '(
     
276.                 senator-try-expand-semantic
     
277.                 try-expand-dabbrev
     
278.                 try-expand-dabbrev-visible
     
279.                 try-expand-dabbrev-all-buffers
     
280.                 try-expand-dabbrev-from-kill
     
281.                 try-expand-list
     
282.                 try-expand-list-all-buffers
     
283.                 try-expand-line
     
284.         try-expand-line-all-buffers
     
285.         try-complete-file-name-partially
     
286.         try-complete-file-name
     
287.         try-expand-whole-kill
     
288.         )
     
289. )
     
290. 
     
291. ;; --------------------------------------------------------------------------
     
292. ;; po-mode
     
293. ;; --------------------------------------------------------------------------
     
294. 
     
295. (setq auto-mode-alist
     
296.         (cons '("\\.po\\'\\|\\.po\\." . po-mode) auto-mode-alist))
     
297. (autoload 'po-mode "po-mode" "Major mode for translators to edit PO files" t)
     
298. 
     
299. ;; --------------------------------------------------------------------------
     
300. ;; reStructuredText
     
301. ;; rest-mode
     
302. ;; --------------------------------------------------------------------------
     
303. 
     
304. (add-to-list 'load-path "~/.emacs.d/site-lisp/rst")
     
305. (autoload 'rst-use-package "rst" "lastest rst support")
     
306. 
     
307. (setq auto-mode-alist
     
308.       (append '(
     
309. ;; ("\\.txt$" . rst-mode)
     
310.                 ("\\.rst$" . rst-mode)
     
311.                 ("\\.rest$" . rst-mode)) auto-mode-alist))
     
312. 
     
313. 
     

复制代码