kiyoka.2007_12_28 RSSPLAIN

Related pages: !kiyoka.blog.list !kiyoka.blog.2007_12
455555555353555355555555555555555555555555555555
4

[プログラミング]flymakeでPHPのリアルタイム文法チェック

5

ブログではいつも関数型言語の記事ばっかり書いているが、実は仕事ではPHPを使うこともある。

5

言語は自分では選べないというのはITの世界ではもはや常識である。

5

言語選択の自由を唱えるRubyのまつもとさんでもその辺は御存知でしょう(笑)

5

というわけで、少しでもPHPの開発効率の悪さを軽減すべく、flymake modoの設定をおこなってみた。

5

 

5

いろんな所でEmacsのflymakeモードの設定が書かれているが、うまく動かなかった。

5

例えば、このサイトのコードも動かない。

5
 Syntax checking for PHP in Emacs at Blik.it - Web, Technology and CodeEXT
3

動かない理由は『バックスラッシュが全て消えている』のが原因だと思われる。

5

恐らく、HTML化する時に失敗しているんだろうと思われる。

3

試しにHTMLソースを見るとちゃんと必要な所にバックスラッシュがちゃんと入っていたよ。

5

 

5

というわけで、これを試してみられたし。

5

私はCentOS4.4, PHP4, GNU Emacs 22.1.1, php-mode-1.2.0の環境で試した。

3

(このページのテキストをコピペする場合は、ページタイトル右のPLAIN TEXTというアイコンをクリックして欲しい)

5

 

5
(when 
5
    (string-match "22" emacs-version)
5
  (progn
5
    ;; Flymake PHP Extension
5
    (require 'flymake)
5
    
5
    (defconst flymake-allowed-php-file-name-masks '(
5
                                                    ("\\.php3\\'" flymake-php-init)
5
                                                    ("\\.inc\\'" flymake-php-init)
5
                                                    ("\\.php\\'" flymake-php-init))
5
      "Filename extensions that switch on flymake-php mode syntax checks")
5
    
5
    (defconst flymake-php-err-line-pattern-re '("\\(.*\\) in \\(.*\\) on line \\([0-9]+\\)" 2 3 nil 1)
5
      "Regexp matching PHP error messages")
5
5
    (defun flymake-php-init ()
5
      (let* ((temp-file       (flymake-init-create-temp-buffer-copy
5
                               'flymake-create-temp-inplace))
5
             (local-file  (file-relative-name
5
                           temp-file
5
                           (file-name-directory buffer-file-name))))
5
        (list "php" (list "-f" local-file "-l"))))
5
    
5
    (defun flymake-php-load ()
5
      (setq flymake-allowed-file-name-masks (append flymake-allowed-file-name-masks flymake-allowed-php-file-name-masks))
5
      (setq flymake-err-line-patterns (cons flymake-php-err-line-pattern-re flymake-err-line-patterns))
5
      (flymake-mode t)
5
      (local-set-key "\C-cd" 'flymake-display-err-menu-for-current-line))
5
5
    (add-hook 'php-mode-user-hook 'flymake-php-load)))
5