Advanced Search

Return to Snippet

Revision: 5928
at April 13, 2008 05:01 by tkf
Initial Code 
; dvips
(defun my-dvips nil
  (interactive)
  (shell-command 
   (concat "dvips " (substring (buffer-name) 0 -4) ".dvi")))
(global-set-key "\C-cps" ' my-dvips )
; evince (PostScript viewer)
(defun my-evince nil
  (interactive)
  (shell-command 
   (concat "evince " (substring (buffer-name) 0 -4) ".ps &")))
(global-set-key "\C-cpp" ' my-evince )
; dvips -E -o output.eps input.dvi
(defun my-dvips-eps nil
  (interactive)
  (setq my-dvips-eps-filename (substring (buffer-name) 0 -4))
  (shell-command 
   (concat "dvips -E -o" my-dvips-eps-filename ".eps "
	   my-dvips-eps-filename ".dvi")))
(global-set-key "\C-cEps" ' my-dvips-eps)
Initial URL 
http://arataka.wordpress.com/2008/04/13/pstrick%e3%81%8c%e4%bd%bf%e3%81%84%e3%82%84%e3%81%99%e3%81%8f%e3%81%aa%e3%82%8b%ef%bc%88%e3%81%8b%e3%82%82%e3%81%97%e3%82%8c%e3%81%aa%e3%81%84%ef%bc%89emacs/
Initial Description 
just paste it to your .emacs
Initial Title 
.emacs for PSTrick user
Initial Tags 

                                

                                                            

                                    

                                        

                                        Initial Language
                                        

                                    

                                    
Emacs Lisp