1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
|
diff --git a/flycheck.el b/flycheck.el
index a364b000..cca47864 100644
--- a/flycheck.el
+++ b/flycheck.el
@@ -10,7 +10,7 @@
;; URL: http://www.flycheck.org
;; Keywords: convenience, languages, tools
;; Version: 33-cvs
-;; Package-Requires: ((emacs "25.1") (dash "2.12.1") (pkg-info "0.4") (let-alist "1.0.4") (seq "1.11"))
+;; Package-Requires: ((emacs "25.1") (dash "2.12.1") (let-alist "1.0.4") (seq "1.11"))
;; This file is not part of GNU Emacs.
@@ -81,7 +81,7 @@
(require 'find-func) ; `find-function-regexp-alist'
(require 'json) ; `flycheck-parse-tslint'
(require 'ansi-color) ; `flycheck-parse-with-patterns-without-color'
-
+(require 'lisp-mnt)
;; Declare a bunch of dynamic variables that we need from other modes
(defvar sh-shell) ; For shell script checker predicates
@@ -90,9 +90,6 @@
(defvar markdown-fontify-code-block-default-mode) ; For rust-error-explainer
(defvar markdown-fontify-code-blocks-natively) ;
-;; Tell the byte compiler about autoloaded functions from packages
-(declare-function pkg-info-version-info "pkg-info" (package))
-
;;; Compatibility
(eval-and-compile
@@ -1287,7 +1284,7 @@ If the version number could not be determined, signal an error,
if called interactively, or if SHOW-VERSION is non-nil, otherwise
just return nil."
(interactive (list t))
- (let ((version (pkg-info-version-info 'flycheck)))
+ (let ((version (lm-version (find-library-name "flycheck"))))
(when show-version
(message "Flycheck version: %s" version))
version))
|
