diff --git a/glicid/packages/patches/ipmitool-evp_cipher_ctx.patch b/glicid/packages/patches/ipmitool-evp_cipher_ctx.patch
new file mode 100644
index 0000000..fb2ed2f
--- /dev/null
+++ b/glicid/packages/patches/ipmitool-evp_cipher_ctx.patch
@@ -0,0 +1,22 @@
+diff --git a/src/plugins/lanplus/lanplus_crypt_impl.c b/src/plugins/lanplus/lanplus_crypt_impl.c
+index d5fac37..8bb1879 100644
+--- a/src/plugins/lanplus/lanplus_crypt_impl.c
++++ b/src/plugins/lanplus/lanplus_crypt_impl.c
+@@ -164,7 +164,7 @@ lanplus_encrypt_aes_cbc_128(const uint8_t * iv,
+ 							uint8_t       * output,
+ 							uint32_t        * bytes_written)
+ {
+-	EVP_CIPHER_CTX ctx;
++  EVP_CIPHER_CTX *ctx = NULL;
+ 	EVP_CIPHER_CTX_init(&ctx);
+ 	EVP_EncryptInit_ex(&ctx, EVP_aes_128_cbc(), NULL, key, iv);
+ 	EVP_CIPHER_CTX_set_padding(&ctx, 0);
+@@ -239,7 +239,7 @@ lanplus_decrypt_aes_cbc_128(const uint8_t * iv,
+ 							uint8_t       * output,
+ 							uint32_t        * bytes_written)
+ {
+-	EVP_CIPHER_CTX ctx;
++  EVP_CIPHER_CTX *ctx = NULL;
+ 	EVP_CIPHER_CTX_init(&ctx);
+ 	EVP_DecryptInit_ex(&ctx, EVP_aes_128_cbc(), NULL, key, iv);
+ 	EVP_CIPHER_CTX_set_padding(&ctx, 0);
diff --git a/glicid/packages/python.scm b/glicid/packages/python.scm
index 64bbe37..36c9493 100644
--- a/glicid/packages/python.scm
+++ b/glicid/packages/python.scm
@@ -4,16 +4,16 @@
   #:use-module ((gnu packages python) #:prefix gnu:)
 )
 
-(define-public python-3.10
+(define-public python-3.9
   (package
-    (inherit gnu:python-3)
+    (inherit gnu:python-3.9)
     (name "python")
-    (version "3.10.5")
+    (version "3.9.13")
     (source
       (origin
         (method url-fetch)
         (uri (string-append "https://www.python.org/ftp/python/" version "/Python-" version ".tar.xz"))
-        (sha256 (base32 "11j4nzbnhbif9pg2m8l67akj0lb2h3c27gxzm9shmvq6n7ayydw4"))
+        (sha256 (base32 "03q8lcb476a9n41nih9qvwf1fzfzjbvq6vj0cnmd458yixchqnqj"))
       )
     )
   )