equal
deleted
inserted
replaced
217 (setq kill-whole-line t) |
217 (setq kill-whole-line t) |
218 |
218 |
219 (setq view-read-only t) |
219 (setq view-read-only t) |
220 |
220 |
221 (setq read-quoted-char-radix 16) |
221 (setq read-quoted-char-radix 16) |
|
222 |
|
223 (setq standard-display-table (make-display-table)) |
|
224 (let ( (i ?\x80) hex hi low ) |
|
225 (while (<= i ?\xff) |
|
226 (setq hex (format "%x" i)) |
|
227 (setq hi (elt hex 0)) |
|
228 (setq low (elt hex 1)) |
|
229 (aset standard-display-table (unibyte-char-to-multibyte i) |
|
230 (vector (make-glyph-code ?\\ 'escape-glyph) |
|
231 (make-glyph-code ?x 'escape-glyph) |
|
232 (make-glyph-code hi 'escape-glyph) |
|
233 (make-glyph-code low 'escape-glyph))) |
|
234 (setq i (+ i 1)))) |
222 |
235 |
223 ;; generic-define-* before (require 'generic-x) allow load all useful extra modes. |
236 ;; generic-define-* before (require 'generic-x) allow load all useful extra modes. |
224 (setq generic-define-mswindows-modes t) |
237 (setq generic-define-mswindows-modes t) |
225 (setq generic-define-unix-modes t) |
238 (setq generic-define-unix-modes t) |
226 (require 'generic-x) |
239 (require 'generic-x) |