Re: Adding a SOAP server to Debbugs.el

[Felix Lechner]

Hi Michael,

On Thu, Mar 07 2024, Michael Albinus wrote:

> You need to add it also into the wsdl:service section of Debbugs.wsdl,

With this patch, I can serve a file with custom endpoints from the Web.

Kind regards
Felix

>From 1f2dff3bb8159cd67dd29b76465dba2475938048 Mon Sep 17 00:00:00 2001
From: Felix Lechner <felix.lechner@lease-up.com>
Date: Thu, 7 Mar 2024 22:03:10 -0800
Subject: [PATCH] Download WSDL specifications from selected server.

* debbugs.el: Download WSDL specification from selected server.
---
 debbugs.el | 8 +-------
 1 file changed, 1 insertion(+), 7 deletions(-)

diff --git a/debbugs.el b/debbugs.el
index d359aa0a23..75cee197d7 100644
--- a/debbugs.el
+++ b/debbugs.el
@@ -89,15 +89,9 @@ This corresponds to the Debbugs server to be accessed, either
   :type '(choice :tag "Debbugs server" (const "gnu.org") (const "debian.org")
                 (string :tag "user defined port name")))
 
-;; It would be nice if we could retrieve it from the debbugs server.
-;; Not supported yet.
 (defconst debbugs-wsdl
   (soap-load-wsdl
-   (expand-file-name
-    "Debbugs.wsdl"
-    (if load-in-progress
-       (file-name-directory load-file-name)
-      default-directory)))
+   (plist-get (alist-get debbugs-port debbugs-servers nil nil #'equal) :wsdl))
   "The WSDL object to be used describing the SOAP interface.")
 
 ;; Please do not increase this value, otherwise we would run into

base-commit: e06d335153fab7eb82771919c82de125b51bdf66
-- 
2.41.0