1
0
Fork 0
emacs-config/oni-php/oni-php.el
Tom Willemse 8af6f8d160 Remove autoloads for snippet loading
Loading ‘yasnippet’ shouldn't automatically load my package configuration. If my
package configuration hasn't been loaded it shouldn't try to include my snippets.
2021-12-01 13:43:21 -08:00

135 lines
4.2 KiB
EmacsLisp
Raw Blame History

This file contains ambiguous Unicode characters

This file contains Unicode characters that might be confused with other characters. If you think that this is intentional, you can safely ignore this warning. Use the Escape button to reveal them.

;;; oni-php.el --- PHP Configuration -*- lexical-binding: t; -*-
;; Copyright (C) 2019 Tom Willemse
;; Author: Tom Willemse <tom@ryuslash.org>
;; Keywords: local
;; Version: 2021.1201.134011
;; Package-Requires: (php-mode oni-yasnippet oni-flycheck oni-company oni-hydra ggtags fic-mode company-php)
;; This program is free software; you can redistribute it and/or modify
;; it under the terms of the GNU General Public License as published by
;; the Free Software Foundation, either version 3 of the License, or
;; (at your option) any later version.
;; This program is distributed in the hope that it will be useful,
;; but WITHOUT ANY WARRANTY; without even the implied warranty of
;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
;; GNU General Public License for more details.
;; You should have received a copy of the GNU General Public License
;; along with this program. If not, see <https://www.gnu.org/licenses/>.
;;; Commentary:
;; My PHP mode configuration. Includes rules for aligning variables according to
;; the WordPress coding standards.
;;; Code:
(require 'align)
(require 'company)
(require 'hydra)
(require 'php-mode)
(require 'whitespace)
(require 'yasnippet)
(defconst oni-php-root
(file-name-directory
(or load-file-name
(buffer-file-name)))
"The directory where oni-php was loaded from.")
(defconst oni-php-snippets-dir
(expand-file-name "snippets" oni-php-root)
"The directory where oni-php stores its snippets.")
(defun oni-php-snippets-initialize ()
"Initialize the snippets for oni-php."
(when (boundp 'yas-snippet-dirs)
(add-to-list 'yas-snippet-dirs oni-php-snippets-dir))
(yas-load-directory oni-php-snippets-dir))
(defun oni-php--set-require-final-newline ()
"Set `require-final-newline' to t.
This is necessary because the PHP mode configuration sets this to
nil for some reason."
(setq require-final-newline t))
(defun oni-php--whitespace-mode ()
"Enable whitespace mode with only tabs showing."
(setq-local whitespace-style '(face tabs))
(whitespace-mode))
(defun oni-php--auto-fill-mode ()
"Enable auto-fill-mode only for comments."
(setq-local comment-auto-fill-only-comments t)
(auto-fill-mode))
(defhydra php-mode-hydra (:color blue)
("a" align-current "Align current selection"))
(add-hook 'php-mode-hook #'oni-php--set-require-final-newline)
(add-hook 'php-mode-hook #'oni-php--whitespace-mode)
(add-hook 'php-mode-hook 'company-mode)
(add-hook 'php-mode-hook 'display-fill-column-indicator-mode)
(add-hook 'php-mode-hook 'electric-indent-local-mode)
(add-hook 'php-mode-hook 'electric-pair-local-mode)
(add-hook 'php-mode-hook 'fic-mode)
(add-hook 'php-mode-hook 'flycheck-mode)
(add-hook 'php-mode-hook 'ggtags-mode)
(add-hook 'php-mode-hook 'oni-php--auto-fill-mode)
(with-eval-after-load 'company
(add-to-list 'company-backends 'company-ac-php-backend))
(define-key php-mode-map (kbd "C-c m") #'php-mode-hydra/body)
;; In PHP code it's nice to have any ~=>~ aligned.
;; <?php
;; array(
;; 'foo' => 'bar',
;; 'frob' => 'baz'
;; );
;; ?>
(add-to-list 'align-rules-list
`(php-array-arrow
(regexp . ,(rx any (group (zero-or-more whitespace)) "=>" any))
(group . (1))
(modes . '(php-mode web-mode))
(repeat . t)))
;; The WordPress coding standards specify that multiple assignments
;; should have their assignment operators aligned.
;; <?php
;; $variable = "value";
;; $other_variable = "other value";
;; $one_more_variable = "one more variable";
(add-to-list 'align-rules-list
`(php-assignment-equals
(regexp . ,(rx any (group (zero-or-more whitespace)) "="
(zero-or-more whitespace) any))
(group . (1))
(modes . '(php-mode web-mode))
(repeat . t)))
(with-eval-after-load 'php-mode
(with-eval-after-load 'yasnippet
(oni-php-snippets-initialize)))
;;;###autoload
(add-to-list 'auto-mode-alist '("\\.inc\\'" . php-mode))
;;;###autoload
(add-to-list 'auto-mode-alist '("\\.module\\'" . php-mode))
;;;###autoload
(with-eval-after-load 'grep
(add-to-list 'grep-files-aliases '("php" . "*.php *.inc *.module")))
(provide 'oni-php)
;;; oni-php.el ends here