[nongnu] elpa/visual-fill-column afaad5ac6b 1/2: Test against `emacs-major-version`.

[ELPA Syncer]

branch: elpa/visual-fill-column
commit afaad5ac6b15cdf9f362662538e35d48578e218a
Author: Joost Kremers <joostkremers@fastmail.fm>
Commit: Joost Kremers <joostkremers@fastmail.fm>

    Test against `emacs-major-version`.
---
 visual-fill-column.el | 14 +++++++-------
 1 file changed, 7 insertions(+), 7 deletions(-)

diff --git a/visual-fill-column.el b/visual-fill-column.el
index e3bf5d7d03..08b547e357 100644
--- a/visual-fill-column.el
+++ b/visual-fill-column.el
@@ -8,7 +8,7 @@
 ;; Maintainer: Joost Kremers <joostkremers@fastmail.fm>
 ;; URL: https://codeberg.org/joostkremers/visual-fill-column
 ;; Created: 2015
-;; Version: 2.4
+;; Version: 2.5
 ;; Package-Requires: ((emacs "25.1"))
 
 ;; This file is NOT part of GNU Emacs.
@@ -175,13 +175,13 @@ that actually visit a file."
     (setq-default split-window-preferred-function 
#'visual-fill-column-split-window-sensibly))
 
   (cond
-   ((version< emacs-version "27.1")
+   ((< emacs-major-version 27)
     (add-hook 'window-size-change-functions 
#'visual-fill-column--adjust-frame))
-   ((version= emacs-version "27.1")
+   ((= emacs-major-version 27)
     (add-hook 'window-size-change-functions 
#'visual-fill-column--adjust-window 'append 'local)
     (setq visual-fill-column--use-split-window-parameter t))
 
-   ((version< "27.1" emacs-version)
+   ((< 27 emacs-major-version)
     (add-hook 'window-state-change-functions 
#'visual-fill-column--adjust-window 'append 'local)
     (setq visual-fill-column--use-min-margins t)))
 
@@ -193,12 +193,12 @@ that actually visit a file."
 
   (let ((window (get-buffer-window (current-buffer))))
     (cond
-     ((version< emacs-version "27.1")
+     ((< emacs-major-version 27)
       (remove-hook 'window-size-change-functions 
#'visual-fill-column--adjust-frame))
-     ((version= emacs-version "27.1")
+     ((= emacs-major-version 27)
       (remove-hook 'window-size-change-functions 
#'visual-fill-column--adjust-window 'local))
 
-     ((version< "27.1" emacs-version)
+     ((< 27 emacs-majon-version)
       (remove-hook 'window-state-change-functions 
#'visual-fill-column--adjust-window 'local)
       (set-window-margins window 0 0)
       (set-window-parameter window 'min-margins nil)))