From mboxrd@z Thu Jan  1 00:00:00 1970
X-Msuck: nntp://news.gmane.io/gmane.emacs.gnus.general/5886
Path: main.gmane.org!not-for-mail
From: Kai Grossjohann <grossjoh@charly.informatik.uni-dortmund.de>
Newsgroups: gmane.emacs.gnus.general
Subject: Strange nntp port number?
Date: 10 Apr 1996 19:02:22 +0200
Sender: grossjoh@dusty.informatik.uni-dortmund.de
Message-ID: <vafenpwc8rl.fsf@dusty.i-have-a-misconfigured-system-so-shoot-me>
Reply-To: Kai Grossjohann <grossjoh@charly.informatik.uni-dortmund.de>
NNTP-Posting-Host: coloc-standby.netfonds.no
Mime-Version: 1.0 (generated by tm-edit 7.41)
Content-Type: text/plain; charset=US-ASCII
X-Trace: main.gmane.org 1035146424 1696 80.91.224.250 (20 Oct 2002 20:40:24 GMT)
X-Complaints-To: usenet@main.gmane.org
NNTP-Posting-Date: Sun, 20 Oct 2002 20:40:24 +0000 (UTC)
Return-Path: ding-request@ifi.uio.no
Original-Received: from ifi.uio.no (ifi.uio.no [129.240.64.2]) by deanna.miranova.com (8.7.5/8.6.9) with SMTP id KAA11400 for <steve@miranova.com>; Wed, 10 Apr 1996 10:49:38 -0700
Original-Received: from floyd.informatik.uni-dortmund.de (floyd.informatik.uni-dortmund.de [129.217.4.40]) by ifi.uio.no with ESMTP (8.6.11/ifi2.4) 
	id <TAA20643@ifi.uio.no> for <ding@ifi.uio.no> ; Wed, 10 Apr 1996 19:02:26 +0200
Original-Received: from dusty.informatik.uni-dortmund.de
	by floyd.informatik.uni-dortmund.de with SMTP (Sendmail 8.7.5/UniDo 3.10)
        id TAA17280; Wed, 10 Apr 1996 19:02:24 +0200 (MES)
Original-Received: by dusty.informatik.uni-dortmund.de id AA03883; Wed, 10 Apr 96 19:02:23 +0200
Original-To: ding@ifi.uio.no
Original-Lines: 37
X-Mailer: September Gnus v0.68/Emacs 19.30
Xref: main.gmane.org gmane.emacs.gnus.general:5886
X-Report-Spam: http://spam.gmane.org/gmane.emacs.gnus.general:5886


Hi all,

suppose I wanted to write a backend nndb.el which is just like nntp.el
but connects on port 9000 by default rather than "nntp" (and also to
host localhost rather than the nntp host).

I have learned from inspecting nndir.el that I should write a function
nndb-execute-nntp-command which calls the nntp-functions, then use
this to redirect all nntp-* functions.

Right now, this is what nndb-execute-nntp-command looks like:

    (defun nndb-execute-nntp-command (command)
      (let ((nntp-port-number nndb-port-number)
            (nntp-address nndb-address))
        (eval command)))

I use this, among other places, in nndb-open-server:

    (defun nndb-open-server (server &optional defs connectionless)
      "Similar to nntp-open-server, but uses different port number
    and server address."
      (nnheader-set-init-variables nndb-server-variables defs)
      (nndb-execute-nntp-command
       `(nntp-open-server ,server ,defs ,connectionless)))

It doesn't work, though :-(

Lars has told me to do it that way, but I really don't seem to be able
to come up with something useful :-(  There must be a fundamental
error I'm making.

Thanks a lot in advance for your help,
kai
--
There ain't no cure for the summertime blues.