Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with
or
.
Download ZIP
Browse files

evo

  • Loading branch information...
commit 48abc149db05c587fc1c744ec6a2fa4f49f5f96c 1 parent 27a6753
@xeno-by authored
Showing with 8 additions and 7 deletions.
  1. +2 −2 desktops/pap/tex.el
  2. +6 −5 xplatform/windows/fonts.el
View
4 desktops/pap/tex.el
@@ -1,9 +1,9 @@
(defun my-compile-project (buffer)
(myke-invoke "compile" buffer (lambda (status command buffer)
-;; (when status
+ (when status
(let ((result (my-latex-result (buffer-file-name buffer))))
(dolist (buffer (buffer-list))
(with-current-buffer buffer
(when (equal (buffer-file-name) result)
(revert-buffer t t))))))))
-;; )
+ )
View
11 xplatform/windows/fonts.el
@@ -1,6 +1,7 @@
-(setq my-default-font "-outline-Consolas-normal-r-normal-normal-14-90-96-96-c-*-utf-8")
-(set-frame-font my-default-font)
-
-(add-hook 'after-make-frame-functions (lambda (frame)
- (modify-frame-parameters frame (list (cons 'font my-default-font)))
+(setq my-default-font "-outline-Consolas-normal-r-normal-normal-14-90-96-96-c-*-utf-8")
+;;(setq my-default-font "-outline-Consolas-normal-r-normal-normal-36-90-96-96-c-*-utf-8")
+(set-frame-font my-default-font)
+
+(add-hook 'after-make-frame-functions (lambda (frame)
+ (modify-frame-parameters frame (list (cons 'font my-default-font)))
(run-hooks 'after-setting-font-hook 'after-setting-font-hooks)))
Please sign in to comment.
Something went wrong with that request. Please try again.