diff --git a/pl.spec b/pl.spec
index 661c134..e665ee5 100644
--- a/pl.spec
+++ b/pl.spec
@@ -90,6 +90,9 @@ Patch1:     swipl-8.2.1-Fix-JNI.patch
 Patch2:     swipl-8.2.0-unbundle-libstemmer.patch
 # Silence some Qt deprecation warnings
 Patch3:     swipl-8.2.3-qt-deprecated.patch
+# Don't use RSA_SSLV23_PADDING with OpenSSL 3.x
+# https://github.com/SWI-Prolog/packages-ssl/issues/160
+Patch4:     swipl-8.2.4-openssl3.patch
 
 BuildRequires:  cmake
 BuildRequires:  findutils
@@ -488,6 +491,9 @@ rm %{buildroot}%{_libdir}/swipl-%{version}/customize/README.md
 
 
 %changelog
+* Thu Sep 16 2021 Jerry James <loganjerry@gmail.com> - 8.2.4-3
+- Add -openssl3 patch to fix FTBFS with OpenSSL 3.0.0
+
 * Tue Sep 14 2021 Sahana Prasad <sahana@redhat.com> - 8.2.4-3
 - Rebuilt with OpenSSL 3.0.0
 
diff --git a/swipl-8.2.4-openssl3.patch b/swipl-8.2.4-openssl3.patch
new file mode 100644
index 0000000..f912757
--- /dev/null
+++ b/swipl-8.2.4-openssl3.patch
@@ -0,0 +1,12 @@
+--- a/packages/ssl/crypto4pl.c	2020-12-29 07:36:23.000000000 -0700
++++ b/packages/ssl/crypto4pl.c	2021-09-15 13:26:07.011819892 -0600
+@@ -848,7 +848,9 @@ get_padding(term_t t, crypt_mode_t mode,
+   { if      ( a == ATOM_pkcs1 && mode == RSA_MODE )      *padding = RSA_PKCS1_PADDING;
+     else if ( a == ATOM_pkcs1_oaep && mode == RSA_MODE ) *padding = RSA_PKCS1_OAEP_PADDING;
+     else if ( a == ATOM_none && mode == RSA_MODE  )      *padding = RSA_NO_PADDING;
++#ifdef RSA_SSLV23_PADDING
+     else if ( a == ATOM_sslv23  && mode == RSA_MODE )    *padding = RSA_SSLV23_PADDING;
++#endif
+     else if ( a == ATOM_none  && mode == EVP_MODE )      *padding = 0;
+     else if ( a == ATOM_block  && mode == EVP_MODE )     *padding = 1;
+     else return PL_domain_error("padding", t);