git://git.exim.org
/
exim.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
tidying
[exim.git]
/
src
/
src
/
perl.c
diff --git
a/src/src/perl.c
b/src/src/perl.c
index 6966d73b5adf96d446e376f2e9936dc74b85e148..2a10452d345c0d4affdc461b320d0dcc5ba6dd66 100644
(file)
--- a/
src/src/perl.c
+++ b/
src/src/perl.c
@@
-2,7
+2,9
@@
* Exim - an Internet mail transport agent *
*************************************************/
* Exim - an Internet mail transport agent *
*************************************************/
+/* Copyright (c) The Exim Maintainers 1999 - 2022 */
/* Copyright (c) 1998 Malcolm Beattie */
/* Copyright (c) 1998 Malcolm Beattie */
+/* SPDX-License-Identifier: GPL-2.0-or-later */
/* Modified by PH to get rid of the "na" usage, March 1999.
Modified further by PH for general tidying for Exim 4.
/* Modified by PH to get rid of the "na" usage, March 1999.
Modified further by PH for general tidying for Exim 4.
@@
-14,6
+16,10
@@
/* See the file NOTICE for conditions of use and distribution. */
#include <assert.h>
/* See the file NOTICE for conditions of use and distribution. */
#include <assert.h>
+
+#define HINTSDB_H
+#define DBFUNCTIONS_H
+
#include "exim.h"
#define EXIM_TRUE TRUE
#include "exim.h"
#define EXIM_TRUE TRUE
@@
-61,7
+67,7
@@
XS(xs_expand_string)
ST(0) = sv_newmortal();
if (str != NULL)
sv_setpv(ST(0), CCS str);
ST(0) = sv_newmortal();
if (str != NULL)
sv_setpv(ST(0), CCS str);
- else if (!expand_string_forcedfail)
+ else if (!
f.
expand_string_forcedfail)
croak("syntax error in Exim::expand_string argument: %s",
expand_string_message);
}
croak("syntax error in Exim::expand_string argument: %s",
expand_string_message);
}