リージョン内のコードを実行
(defun php-eval (beg end) "Run selected region as PHP code" (interactive "r") (let ((code (concat "<?php " (buffer-substring beg end)))) (with-temp-buffer (insert code) (shell-command-on-region (point-min) (point-max) "php") )))
emacs lisp勉強ちゅう。
開始タグを付けて実行する方法に悩んだ。