branch: elpa/haskell-tng-mode
commit e4ead9822e2c7e999a1a97df95cd36407e4f600f
Author: Tseen She <ts33n....@gmail.com>
Commit: Tseen She <ts33n....@gmail.com>
thots on prettify-symbol
---
haskell-tng-compile.el | 11 ++++++++++-
1 file changed, 10 insertions(+), 1 deletion(-)
diff --git a/haskell-tng-compile.el b/haskell-tng-compile.el
index a644704..5a56623 100644
--- a/haskell-tng-compile.el
+++ b/haskell-tng-compile.el
@@ -16,7 +16,6 @@
(require 'haskell-tng-util)
-;; TODO prettify-symbol rules for home dirs, project dirs, and hide .o files,
etc
;; TODO set compilation-directory when opening the file
;; TODO set compilation-environment to include TASTY envvars
@@ -117,6 +116,16 @@ will cause the subsequent call to prompt."
(define-compilation-mode haskell-tng-compilation-mode "haskell-tng-compilation"
(add-hook 'compilation-filter-hook
'haskell-tng--compile-ansi-color nil t)
+
+ ;; TODO prettify-symbol rules for home dirs, project dirs, and hide .o
files, etc
+ ;; https://emacs.stackexchange.com/questions/51691
+ ;; (setq
+ ;; prettify-symbols-alist
+ ;; `((,(expand-file-name
+ ;; ;; i.e. the parent directory of this one
+ ;; (directory-file-name (file-name-directory (directory-file-name
default-directory)))) . ?ยง)
+ ;; (,(expand-file-name "~") . ?~)))
+
(cl-flet ((bind (key def)
(define-key haskell-tng-compilation-mode-map (kbd key) def)))
(bind "C-c c" 'haskell-tng-compile)
