X-Git-Url: https://git.openssl.org/?p=openssl.git;a=blobdiff_plain;f=perl%2Fopenssl_cipher.xs;h=fb4c63299512eeb9d61510dd0eb74854374fc79d;hp=1044d7a4ef861f046b979f5c849897e58df77c6e;hb=b5b22731f16919a4cd8445cdd6c5a6e73aebd4a6;hpb=58964a492275ca9a59a0cd9c8155cb2491b4b909 diff --git a/perl/openssl_cipher.xs b/perl/openssl_cipher.xs index 1044d7a4ef..fb4c632995 100644 --- a/perl/openssl_cipher.xs +++ b/perl/openssl_cipher.xs @@ -1,4 +1,5 @@ -#include "p5SSLeay.h" + +#include "openssl.h" int boot_cipher() { @@ -6,7 +7,7 @@ int boot_cipher() return(1); } -MODULE = SSLeay::Cipher PACKAGE = SSLeay::Cipher PREFIX = p5_EVP_C_ +MODULE = OpenSSL::Cipher PACKAGE = OpenSSL::Cipher PREFIX = p5_EVP_C_ VERSIONCHECK: DISABLE @@ -22,14 +23,14 @@ p5_EVP_C_new(...) else if ((items == 2) && SvPOK(ST(1))) name=SvPV(ST(1),na); else - croak("Usage: SSLeay::Cipher::new(type)"); + croak("Usage: OpenSSL::Cipher::new(type)"); PUSHs(sv_newmortal()); c=EVP_get_cipherbyname(name); if (c != NULL) { ctx=malloc(sizeof(EVP_CIPHER_CTX)); EVP_EncryptInit(ctx,c,NULL,NULL); - sv_setref_pv(ST(0), "SSLeay::Cipher", (void*)ctx); + sv_setref_pv(ST(0), "OpenSSL::Cipher", (void*)ctx); } datum