ryuslash/legacy-dotfiles
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

EMACS: Added a 'preview' function for HMTL files

Browse source
This commit is contained in:
Tom Willemsen 2011-05-28 15:25:58 +02:00
parent b3dee4f7f4
commit 5690154ecb
3 changed files with 10 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
emacs.d/00-functions.el
View file

@ -34,3 +34,7 @@
(if (string= (substring ext 0 1) "c") (if (string= (substring ext 0 1) "c")
(find-file (concat noext ".h")) (find-file (concat noext ".h"))
(find-file (concat noext ".c"))))) (find-file (concat noext ".c")))))
(defun browse-to-current-file ()
(interactive)
(browse-url buffer-file-name))

2
emacs.d/10-settings.el
View file

@ -8,6 +8,8 @@
; possible fontification ; possible fontification
inhibit-default-init t ; don't load default init inhibit-default-init t ; don't load default init
scroll-conservatively 10000 ; scroll only one line scroll-conservatively 10000 ; scroll only one line
browse-url-browser-function 'browse-url-generic
browse-url-generic-program "conkeror"
whitespace-style '(face trailing) whitespace-style '(face trailing)
backup-directory-alist ; backup file location backup-directory-alist ; backup file location
`((".*" . `((".*" .

4
emacs.d/20-html-mode.el Normal file
View file

@ -0,0 +1,4 @@
(add-hook 'html-mode-hook
(lambda ()
(local-set-key [f9] 'browse-to-current-file)
(auto-fill-mode)))