mirror of
https://github.com/kika/fixedsys.git
synced 2024-05-04 20:22:20 +12:00
Merge pull request #10 from adrianparvino/patch-1
Instructions for Emacs
This commit is contained in:
commit
489f71efbc
46
README.md
46
README.md
|
@ -74,6 +74,52 @@ Courtesy of @ForNeVeR:
|
|||
- Windows + Visual Studio 2015: works mostly okay, but `->` ligature doesn't work. That's a [known problem of WPF text renderer](https://github.com/tonsky/FiraCode/issues/259#issuecomment-243422144).
|
||||
- Windows + ConEmu: no ligatures at all. Powerline stuff works okay though, so font is usable even without ligatures. I'd recommend to set font cell width manually to 8 (otherwise it'll have problems determining proper places for line wrapping and rendering Far Manager UI): **Settings** → **Main** → **Main console font** group → select **Cell: 8** from the selector.
|
||||
|
||||
### Emacs
|
||||
Requires you to move the U+10001 PUA block to the first PUA block
|
||||
|
||||
In this example, U+10001 was moved to U+efb0.
|
||||
|
||||
Based on https://github.com/tonsky/FiraCode/wiki/Setting-up-Emacs
|
||||
```
|
||||
(set-fontset-font t '(#Xefb0 . #Xefc5) "Fixedsys Excelsior")
|
||||
(defconst fixedsys-excelsior-font-lock-keywords-alist
|
||||
(mapcar (lambda (regex-char-pair)
|
||||
`(,(car regex-char-pair)
|
||||
(0 (prog1 ()
|
||||
(compose-region (match-beginning 1)
|
||||
(match-end 1)
|
||||
;; The first argument to concat is a string containing a literal tab
|
||||
,(concat " " (list (decode-char 'ucs (cadr regex-char-pair)))))))))
|
||||
'(("\\(>>=\\)" #Xefb0)
|
||||
("\\(=<<\\)" #Xefb1)
|
||||
("\\(<\\*>\\)" #Xefb2)
|
||||
("\\(<\\$>\\)" #Xefb3)
|
||||
("\\(::\\)" #Xefb4)
|
||||
("\\(:=\\)" #Xefb5)
|
||||
("\\(<<<\\)" #Xefb6)
|
||||
("\\(>>>\\)" #Xefb7)
|
||||
("\\(<>\\)" #Xefb8)
|
||||
("\\(/=\\)" #Xefb9)
|
||||
("\\({-\\)" #Xefba)
|
||||
("\\(-}\\)" #Xefbb)
|
||||
("\\(<|\\)" #Xefbc)
|
||||
("\\(|>\\)" #Xefbd)
|
||||
("\\(~>\\)" #Xefbe)
|
||||
("\\(<~\\)" #Xefbf)
|
||||
("\\(<~>\\)" #Xefc0)
|
||||
("\\(<^>\\)" #Xefc1)
|
||||
("\\(/\\\\\\)" #Xefc2)
|
||||
("\\(<|>\\)" #Xefc3)
|
||||
("\\(>=>\\)" #Xefc4)
|
||||
("\\(<=<\\)" #Xefc5))))
|
||||
|
||||
|
||||
(defun add-fixedsys-excelsior-symbol-keywords ()
|
||||
(font-lock-add-keywords nil fixedsys-excelsior-font-lock-keywords-alist))
|
||||
|
||||
(add-hook 'prog-mode-hook
|
||||
#'add-fixedsys-excelsior-symbol-keywords)
|
||||
```
|
||||
## ToDo
|
||||
<* *> <$ $>
|
||||
|
||||
|
|
Loading…
Reference in a new issue