aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorGravatar Tom Willemsen2024-12-30 14:16:50 -0800
committerGravatar Tom Willemsen2024-12-30 14:16:50 -0800
commit2cbb137dd20bc9d57e661af759862f3106f1fa72 (patch)
tree1c9f08add1381fde4d04a04b079ead9824322078
parent2b3048fc8727a954d8afb9b6cf3292d1868eb7b6 (diff)
downloademacs-config-2cbb137dd20bc9d57e661af759862f3106f1fa72.tar.gz
emacs-config-2cbb137dd20bc9d57e661af759862f3106f1fa72.zip
oni-php: Warn me when I'm trying to use a non-existent class
-rw-r--r--oni-php/oni-php.el9
1 files changed, 6 insertions, 3 deletions
diff --git a/oni-php/oni-php.el b/oni-php/oni-php.el
index 2d10242..9af7e92 100644
--- a/oni-php/oni-php.el
+++ b/oni-php/oni-php.el
@@ -75,9 +75,12 @@ nil for some reason."
(interactive (list (symbol-name (symbol-at-point))))
(let* ((default-directory (project-root (project-current)))
(classes (read (shell-command-to-string (concat (expand-file-name "find-php-class" oni-php-scripts-dir) " " class))))
- (class (if (> (length classes) 1)
- (completing-read "Use: " classes nil t)
- (car classes))))
+ (class (cond
+ ((null classes)
+ (user-error "Class ā€˜%s’ not found" class))
+ ((> (length classes) 1)
+ (completing-read "Use: " classes nil t))
+ (t (car classes)))))
(save-excursion
(goto-char (point-min))
(search-forward "use ")