summaryrefslogtreecommitdiff
path: root/security/p5-Crypt-GpgME/files/patch-xs_GpgME.xs
blob: 42f999ad3888b00c75b11cf1ded154e0bfb93cef (plain) (blame)
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
The trustlist feature, which only worked for a short period in 2003, was
removed in GpgME 2.0.0.

--- xs/GpgME.xs.orig	2008-04-30 04:10:27 UTC
+++ xs/GpgME.xs
@@ -453,29 +453,6 @@ gpgme_keylist (ctx, pattern, secret_only=0)
 			perl_gpgme_assert_error (err);
 		}
 
-void
-gpgme_trustlist (ctx, pattern, max_level)
-		gpgme_ctx_t ctx
-		const char *pattern
-		int max_level
-	PREINIT:
-		gpgme_error_t err;
-		gpgme_trust_item_t item;
-	PPCODE:
-		err = gpgme_op_trustlist_start (ctx, pattern, max_level);
-		perl_gpgme_assert_error (err);
-
-		while ((err = gpgme_op_trustlist_next (ctx, &item)) == GPG_ERR_NO_ERROR) {
-			XPUSHs (perl_gpgme_hashref_from_trust_item (item));
-			gpgme_trust_item_unref (item);
-		}
-
-		if (gpg_err_code (err) != GPG_ERR_EOF) {
-			perl_gpgme_assert_error (err);
-		}
-
-		gpgme_op_trustlist_end (ctx);
-
 NO_OUTPUT gpgme_error_t
 gpgme_engine_check_version (ctx, proto)
 		perl_gpgme_ctx_or_null_t ctx