1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
|
Description: Correct headings
--- libsendmail-pmilter-perl-1.00.orig/lib/Sendmail/Milter.pm
+++ libsendmail-pmilter-perl-1.00/lib/Sendmail/Milter.pm
@@ -145,6 +145,10 @@ __END__
=pod
+=head1 NAME
+
+Sendmail::Milter - compatibility interface for Sendmail::PMilter
+
=head1 SYNOPSIS
use Sendmail::Milter;
--- libsendmail-pmilter-perl-1.00.orig/lib/Sendmail/PMilter.pm
+++ libsendmail-pmilter-perl-1.00/lib/Sendmail/PMilter.pm
@@ -80,8 +80,6 @@ to be called Mail::Milter.
=head1 METHODS
-=over 4
-
=cut
##### Symbols exported to the caller
@@ -124,6 +122,8 @@ sub new ($) {
=pod
+=over 4
+
=item get_max_interpreters()
Returns the maximum number of interpreters passed to C<main()>. This is
@@ -470,10 +470,6 @@ these methods would not be useful with t
=over 4
-=cut
-
-=pod
-
=item auto_getconn(NAME[, CONFIG])
Returns the connection descriptor for milter NAME in Sendmail configuration
@@ -950,6 +946,8 @@ Note that, because the default socket ba
wise to increase this backlog by calling C<set_listen()> before entering
C<main()> if using this dispatcher.
+=back
+
=cut
sub sequential_dispatcher () {
@@ -1042,8 +1040,6 @@ when called:
=back
-=back
-
=head1 SECURITY CONSIDERATIONS
=over 4
--- libsendmail-pmilter-perl-1.00.orig/lib/Sendmail/PMilter/Context.pm
+++ libsendmail-pmilter-perl-1.00/lib/Sendmail/PMilter/Context.pm
@@ -48,7 +48,7 @@ our $VERSION = '0.94';
=pod
-=head1 SYNOPSIS
+=head1 NAME
Sendmail::PMilter::Context - per-connection milter context
@@ -60,8 +60,6 @@ This manual explains publicly accessible
=head1 METHODS
-=over 4
-
=cut
##### Symbols exported to the caller
@@ -394,6 +392,8 @@ sub call_hooks ($$;@) {
=pod
+=over 4
+
=item $ctx->getpriv
Returns the private data object for this milter instance, set by
|
