File tree Expand file tree Collapse file tree 2 files changed +9
-1
lines changed Expand file tree Collapse file tree 2 files changed +9
-1
lines changed Original file line number Diff line number Diff line change 5
5
(package-file " php-project.el" )
6
6
7
7
(development
8
+ (depends-on " pkg-info" )
8
9
(depends-on " shut-up" ))
Original file line number Diff line number Diff line change @@ -1188,6 +1188,7 @@ After setting the stylevars run hooks according to STYLENAME
1188
1188
" Display informations useful for debugging PHP Mode."
1189
1189
(interactive )
1190
1190
(require 'cus-edit )
1191
+ (require 'pkg-info nil t )
1191
1192
(php-mode-debug--buffer 'init )
1192
1193
(php-mode-debug--message " Feel free to report on GitHub what you noticed!" )
1193
1194
(php-mode-debug--message " https://github.com/ejmr/php-mode/issues/new" )
@@ -1196,7 +1197,13 @@ After setting the stylevars run hooks according to STYLENAME
1196
1197
(php-mode-debug--message " ```" )
1197
1198
(php-mode-debug--message " --- PHP-MODE DEBUG BEGIN ---" )
1198
1199
(php-mode-debug--message " versions: %s; %s" (emacs-version ) (php-mode-version))
1199
- (php-mode-debug--message " package-version: %s" (pkg-info-version-info 'php-mode ))
1200
+ (php-mode-debug--message " package-version: %s"
1201
+ (if (fboundp 'pkg-info )
1202
+ (pkg-info-version-info 'php-mode )
1203
+ (let ((pkg (and (boundp 'package-alist )
1204
+ (cadr (assq 'php-mode package-alist)))))
1205
+ (when (and pkg (member (package-desc-status pkg) '(" unsigned" " dependency" )))
1206
+ (package-version-join (package-desc-version pkg))))))
1200
1207
1201
1208
(php-mode-debug--message " major-mode: %s" major-mode)
1202
1209
(php-mode-debug--message " minor-modes: %s"
You can’t perform that action at this time.
0 commit comments