--- a/.emacs-my	Wed Sep 06 14:42:39 2017 +0300
+++ b/.emacs-my	Thu Sep 21 15:09:27 2017 +0300
@@ -3257,6 +3257,14 @@
   (define-key log4-hi-mode-map [C-return] #'my-java-exeption))
 
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
+(message "cfengine")
+
+(my--eval-after-load cfengine3
+  (defconst cfengine3--prettify-symbols-alist
+    '(("->"  . ?→)
+      ("=>"  . ?⇛))))
+
+;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 (message "Pascal")
 
 (eval-when 'compile (require 'pascal))