From 42bbc574cdd584bdc75b8a46e2de2e7bf6ead76f Mon Sep 17 00:00:00 2001
From: Benjamin Kreuter <ben.kreuter@gmail.com>
Date: May 12 2019 13:38:14 +0000
Subject: re-added slime version test patch


---

diff --git a/223-fix-slime-version-test.patch b/223-fix-slime-version-test.patch
new file mode 100644
index 0000000..7461f56
--- /dev/null
+++ b/223-fix-slime-version-test.patch
@@ -0,0 +1,23 @@
+diff --git a/swank-loader.lisp b/swank-loader.lisp
+index 5452dc4..93c391a 100644
+--- a/swank-loader.lisp
++++ b/swank-loader.lisp
+@@ -142,17 +142,7 @@ operating system, and hardware architecture."
+ (defun string-starts-with (string prefix)
+   (string-equal string prefix :end1 (min (length string) (length prefix))))
+ 
+-(defun slime-version-string ()
+-  "Return a string identifying the SLIME version.
+-Return nil if nothing appropriate is available."
+-  (with-open-file (s (merge-pathnames "slime.el" *source-directory*)
+-                     :if-does-not-exist nil)
+-    (when s
+-      (loop with prefix = ";; Version: "
+-            for line = (read-line s nil :eof)
+-            until (eq line :eof)
+-            when (string-starts-with line prefix)
+-              return (subseq line (length prefix))))))
++(defun slime-version-string () "2.23")
+ 
+ (defun default-fasl-dir ()
+   (merge-pathnames
diff --git a/emacs-slime.spec b/emacs-slime.spec
index 67aa227..0c679f7 100644
--- a/emacs-slime.spec
+++ b/emacs-slime.spec
@@ -1,7 +1,7 @@
 %global pkg slime
 
 Name:            emacs-%{pkg}
-Epoch:           1
+Epoch:           2
 Version:         2.23
 Release:         1%{?dist}
 Summary:         The superior lisp interaction mode for emacs        
@@ -14,6 +14,7 @@ License:         Public Domain and GPLv3+ and GPLv2+ and LLGPL
 URL:             http://common-lisp.net/project/slime/
 Source0:         https://github.com/slime/slime/archive/v%{version}.tar.gz
 Patch1:          223-fix-test.patch
+Patch2:          223-fix-slime-version-test.patch
 
 BuildRequires:   emacs texinfo common-lisp-controller
 # for testing
@@ -34,6 +35,7 @@ SLIME is a Emacs mode for common Lisp development.
 %prep
 %setup -q -n %{pkg}-%{version}
 %patch1 -p1
+%patch2 -p1
 
 %build
 #{_emacs_bytecompile} *.el