javascriptなどのfunctionとかの表示を短くしてみる

書いたもの

(defmacro set-pretty-keywords (mode keyword-num-char-list)
  `(font-lock-add-keywords 
	,mode
	(quote ,(loop for (keyword num char) in keyword-num-char-list collect 
		  `(,keyword (0 (prog1 ()
				  (compose-region (match-beginning ,num)
						  (match-end ,num)
						  ,char))))))))

.emacs

(add-hook 'js2-mode-hook 
	  (lambda ()
	    (set-pretty-keywords nil (("\\<function\\>" 0 ?Ｆ) ("\\<return\\>" 0 ?→)))
))

このような内容が

[1,2,3].map(function(x){return x*x;});// =>  1,4,9

このように