Remove RCS ids, add arch tags

This commit is contained in:
Magnus Henoch 2004-04-15 23:15:21 +00:00 committed by Kirill A. Korinskiy
parent 0bfecbfc71
commit 7f0d0abd58
24 changed files with 50 additions and 24 deletions

View File

@ -1,5 +1,4 @@
;; jabber-ahc-presence.el - provide remote control of presence
;; $Id: jabber-ahc-presence.el,v 1.3 2004/03/13 11:33:25 legoscia Exp $
;; Copyright (C) 2002, 2003, 2004 - tom berger - object@intelectronica.net
;; Copyright (C) 2003, 2004 - Magnus Henoch - mange@freemail.hu
@ -102,3 +101,5 @@
(note ((type . "info")) "Presence has been changed."))))))
(provide 'jabber-ahc-presence)
;;; arch-tag: 4b8cbbe7-00a9-4d42-a4ac-b824ab914fba

View File

@ -1,5 +1,4 @@
;; jabber-ahc.el - Ad-Hoc Commands by JEP-0050
;; $Id: jabber-ahc.el,v 1.6 2004/03/31 09:30:09 legoscia Exp $
;; Copyright (C) 2002, 2003, 2004 - tom berger - object@intelectronica.net
;; Copyright (C) 2003, 2004 - Magnus Henoch - mange@freemail.hu
@ -223,3 +222,5 @@ access allowed. nil means open for everyone."
#'jabber-process-data "Command execution failed"))
(provide 'jabber-ahc)
;;; arch-tag: c0d5ed8c-50cb-44e1-8e0f-4058b79ee353

View File

@ -1,5 +1,4 @@
;; jabber-alert.el - alert hooks
;; $Id: jabber-alert.el,v 1.3 2004/03/29 20:07:52 legoscia Exp $
;; Copyright (C) 2002, 2003, 2004 - tom berger - object@intelectronica.net
;; Copyright (C) 2003, 2004 - Magnus Henoch - mange@freemail.hu
@ -277,3 +276,5 @@ This function uses `jabber-info-message-alist' to find a message."
(switch-to-buffer buffer))
(provide 'jabber-alert)
;;; arch-tag: 725bd73e-c613-4fdc-a11d-3392a7598d4f

View File

@ -1,5 +1,4 @@
;; jabber-browse.el - jabber browsing by JEP-0011
;; $Id: jabber-browse.el,v 1.3 2004/03/29 20:07:52 legoscia Exp $
;; Copyright (C) 2002, 2003, 2004 - tom berger - object@intelectronica.net
;; Copyright (C) 2003, 2004 - Magnus Henoch - mange@freemail.hu
@ -95,3 +94,5 @@
(jabber-process-browse item))))))
(provide 'jabber-browse)
;;; arch-tag: be01ab34-96eb-4fcb-aa35-a0d3e6c446c3

View File

@ -1,5 +1,4 @@
;; jabber-chat.el - chat buffer display, basic groupchat functions
;; $Id: jabber-chat.el,v 1.8 2004/04/06 11:32:12 legoscia Exp $
;; Copyright (C) 2002, 2003, 2004 - tom berger - object@intelectronica.net
;; Copyright (C) 2003, 2004 - Magnus Henoch - mange@freemail.hu
@ -220,3 +219,5 @@ TIMESTAMP is timestamp, or nil for now."
(jabber-send-message to body nil "chat"))
(provide 'jabber-chat)
;;; arch-tag: a6cca037-2fcd-4e3b-8a40-d00523aebff5

View File

@ -1,5 +1,4 @@
;; jabber-core.el - core functions
;; $Id: jabber-core.el,v 1.9 2004/04/02 19:27:56 legoscia Exp $
;; Copyright (C) 2002, 2003, 2004 - tom berger - object@intelectronica.net
;; Copyright (C) 2003, 2004 - Magnus Henoch - mange@freemail.hu
@ -195,3 +194,5 @@ With prefix argument, register a new account."
(process-send-string *jabber-connection* (jabber-sexp2xml sexp)))
(provide 'jabber-core)
;;; arch-tag: 9d273ce6-c45a-447b-abf3-21d3ce73a51a

View File

@ -1,5 +1,4 @@
;; jabber-disco.el - service discovery functions
;; $Id: jabber-disco.el,v 1.8 2004/04/03 09:01:08 legoscia Exp $
;; Copyright (C) 2002, 2003, 2004 - tom berger - object@intelectronica.net
;; Copyright (C) 2003, 2004 - Magnus Henoch - mange@freemail.hu
@ -199,3 +198,5 @@ See JEP-0030."
#'jabber-process-data "Info discovery failed"))
(provide 'jabber-disco)
;;; arch-tag: 71f5c76f-2956-4ed2-b871-9f5fe198092d

View File

@ -1,5 +1,4 @@
;; jabber-feature-neg.el - Feature Negotiation by JEP-0020
;; $Id: jabber-feature-neg.el,v 1.2 2004/04/11 21:01:59 legoscia Exp $
;; Copyright (C) 2002, 2003, 2004 - tom berger - object@intelectronica.net
;; Copyright (C) 2003, 2004 - Magnus Henoch - mange@freemail.hu
@ -122,3 +121,5 @@ protocols."
alist)))
(provide 'jabber-feature-neg)
;;; arch-tag: 65b2cdcc-7a5f-476b-a613-84ec8e590186

View File

@ -1,5 +1,4 @@
;; jabber-ft-server.el - handle incoming file transfers, by JEP-0096
;; $Id: jabber-ft-server.el,v 1.2 2004/04/11 21:01:59 legoscia Exp $
;; Copyright (C) 2002, 2003, 2004 - tom berger - object@intelectronica.net
;; Copyright (C) 2003, 2004 - Magnus Henoch - mange@freemail.hu
@ -84,3 +83,5 @@ is function to call to get more data."
(insert data)))))
(provide 'jabber-ft-server)
;;; arch-tag: 334adcff-6210-496e-8382-8f49ae0248a1

View File

@ -1,5 +1,4 @@
;; jabber-iq.el - infoquery functions
;; $Id: jabber-iq.el,v 1.9 2004/03/29 23:13:47 legoscia Exp $
;; Copyright (C) 2002, 2003, 2004 - tom berger - object@intelectronica.net
;; Copyright (C) 2003, 2004 - Magnus Henoch - mange@freemail.hu
@ -161,3 +160,5 @@ See section 9.3 of XMPP Core."
(run-hook-with-args 'jabber-alert-info-message-hooks 'browse (current-buffer) (funcall jabber-alert-info-message-function 'browse (current-buffer))))))
(provide 'jabber-iq)
;;; arch-tag: 5585dfa3-b59a-42ee-9292-803652c85e26

View File

@ -1,5 +1,4 @@
;; jabber-keymap.el - common keymap for many modes
;; $Id: jabber-keymap.el,v 1.1 2004/03/29 23:13:47 legoscia Exp $
;; Copyright (C) 2002, 2003, 2004 - tom berger - object@intelectronica.net
;; Copyright (C) 2003, 2004 - Magnus Henoch - mange@freemail.hu
@ -33,3 +32,5 @@
)
(provide 'jabber-keymap)
;;; arch-tag: 22a9993d-a4a7-40ef-a025-7cff6c3f5587

View File

@ -1,5 +1,4 @@
;; jabber-logon.el - logon functions
;; $Id: jabber-logon.el,v 1.2 2004/03/29 20:07:52 legoscia Exp $
;; Copyright (C) 2002, 2003, 2004 - tom berger - object@intelectronica.net
;; Copyright (C) 2003, 2004 - Magnus Henoch - mange@freemail.hu
@ -83,3 +82,5 @@ CLOSURE-DATA should be t on success and nil on failure."
(jabber-disconnect)))
(provide 'jabber-logon)
;;; arch-tag: f24ebe5e-3420-44bb-af81-d4de21f378b0

View File

@ -1,5 +1,4 @@
;; jabber-menu.el - menu definitions
;; $Id: jabber-menu.el,v 1.1 2004/03/02 13:08:25 legoscia Exp $
;; Copyright (C) 2002, 2003, 2004 - tom berger - object@intelectronica.net
;; Copyright (C) 2003, 2004 - Magnus Henoch - mange@freemail.hu
@ -75,3 +74,5 @@
(jabber-popup-menu (append jabber-jid-chat-menu jabber-jid-info-menu jabber-jid-roster-menu jabber-jid-muc-menu)))
(provide 'jabber-menu)
;;; arch-tag: 5147f52f-de47-4348-86ff-b799d7a75e3f

View File

@ -1,5 +1,4 @@
;; jabber-muc.el - advanced MUC functions
;; $Id: jabber-muc.el,v 1.1 2004/03/02 13:08:25 legoscia Exp $
;; Copyright (C) 2002, 2003, 2004 - tom berger - object@intelectronica.net
;; Copyright (C) 2003, 2004 - Magnus Henoch - mange@freemail.hu
@ -79,3 +78,5 @@
nil nil nil nil))
(provide 'jabber-muc)
;;; arch-tag: 1ff7ab35-1717-46ae-b803-6f5b3fb2cd7d

View File

@ -1,5 +1,4 @@
;; jabber-presence.el - roster and presence bookkeeping
;; $Id: jabber-presence.el,v 1.7 2004/04/06 11:23:04 legoscia Exp $
;; Copyright (C) 2002, 2003, 2004 - tom berger - object@intelectronica.net
;; Copyright (C) 2003, 2004 - Magnus Henoch - mange@freemail.hu
@ -277,3 +276,5 @@ CLOSURE-DATA should be 'initial if initial roster push, nil otherwise."
#'jabber-report-success "Roster item removal"))
(provide 'jabber-presence)
;;; arch-tag: b8616d4c-dde8-423e-86c7-da7b4928afc3

View File

@ -1,5 +1,4 @@
;; jabber-register.el - registration according to JEP-0077
;; $Id: jabber-register.el,v 1.1 2004/03/02 13:08:25 legoscia Exp $
;; Copyright (C) 2002, 2003, 2004 - tom berger - object@intelectronica.net
;; Copyright (C) 2003, 2004 - Magnus Henoch - mange@freemail.hu
@ -126,3 +125,5 @@ CLOSURE-DATA is either 'success or 'error."
#'jabber-report-success "Unregistration")))
(provide 'jabber-register)
;;; arch-tag: e6b349d6-b1ad-4d19-a412-74459dfae239

View File

@ -1,5 +1,4 @@
;; jabber-roster.el - displaying the roster
;; $Id: jabber-roster.el,v 1.6 2004/03/29 23:13:47 legoscia Exp $
;; Copyright (C) 2002, 2003, 2004 - tom berger - object@intelectronica.net
;; Copyright (C) 2003, 2004 - Magnus Henoch - mange@freemail.hu
@ -146,3 +145,5 @@ bring up menus of actions.
(run-hook-with-args 'jabber-alert-info-message-hooks 'roster (current-buffer) (funcall jabber-alert-info-message-function 'roster (current-buffer))))))
(provide 'jabber-roster)
;;; arch-tag: 096af063-0526-4dd2-90fd-bc6b5ba07d32

View File

@ -1,5 +1,4 @@
;; jabber-search.el - searching by JEP-0055, with x:data support
;; $Id: jabber-search.el,v 1.2 2004/03/03 19:24:58 legoscia Exp $
;; Copyright (C) 2002, 2003, 2004 - tom berger - object@intelectronica.net
;; Copyright (C) 2003, 2004 - Magnus Henoch - mange@freemail.hu
@ -112,3 +111,5 @@
(insert "\n"))))))
(provide 'jabber-search)
;;; arch-tag: c39e9241-ab6f-4ac5-b1ba-7908bbae009c

View File

@ -1,5 +1,4 @@
;; jabber-socks5.el - SOCKS5 bytestreams by JEP-0065
;; $Id: jabber-socks5.el,v 1.2 2004/04/11 21:01:59 legoscia Exp $
;; Copyright (C) 2002, 2003, 2004 - tom berger - object@intelectronica.net
;; Copyright (C) 2003, 2004 - Magnus Henoch - mange@freemail.hu
@ -121,3 +120,5 @@ Zeroconf is not supported."
nil)))
(provide 'jabber-socks5)
;;; arch-tag: 9e70dfea-2522-40c6-a79f-302c8fb82ac5

View File

@ -1,5 +1,4 @@
;; jabber-version.el - version reporting by JEP-0092
;; $Id: jabber-version.el,v 1.4 2004/03/29 20:07:52 legoscia Exp $
;; Copyright (C) 2002, 2003, 2004 - tom berger - object@intelectronica.net
;; Copyright (C) 2003, 2004 - Magnus Henoch - mange@freemail.hu
@ -69,3 +68,5 @@ determined from the incoming packet passed in XML-DATA."
id)))
(provide 'jabber-version)
;;; arch-tag: 2051dbe7-01b5-401e-bd8a-fe24afb88e1e

View File

@ -1,5 +1,4 @@
;; jabber-widget.el - display various kinds of forms
;; $Id: jabber-widget.el,v 1.4 2004/03/29 20:07:52 legoscia Exp $
;; Copyright (C) 2002, 2003, 2004 - tom berger - object@intelectronica.net
;; Copyright (C) 2003, 2004 - Magnus Henoch - mange@freemail.hu
@ -266,3 +265,5 @@ Return a list of strings, each of which to be included as cdata in a <value/> ta
(insert "\n")))))
(provide 'jabber-widget)
;;; arch-tag: da3312f3-1970-41d5-a974-14b8d76156b8

View File

@ -1,5 +1,4 @@
;; jabber-xml.el - XML functions
;; $Id: jabber-xml.el,v 1.3 2004/03/29 20:07:52 legoscia Exp $
;; Copyright (C) 2002, 2003, 2004 - tom berger - object@intelectronica.net
;; Copyright (C) 2003, 2004 - Magnus Henoch - mange@freemail.hu
@ -118,3 +117,5 @@ is not present, emulate it with `xml-get-attribute'."
(and (> (length result) 0) result))))
(provide 'jabber-xml)
;;; arch-tag: ca206e65-7026-4ee8-9af2-ff6a9c5af98a

View File

@ -1,5 +1,4 @@
;; jabber.el - a minimal jabber client
;; $Id: jabber.el,v 1.44 2004/04/03 20:00:29 legoscia Exp $
;; Copyright (C) 2002, 2003, 2004 - tom berger - object@intelectronica.net
;; Copyright (C) 2003, 2004 - Magnus Henoch - mange@freemail.hu
@ -268,3 +267,5 @@ Offline is represented as nil."
(info "jabber"))
(provide 'jabber)
;;; arch-tag: 5145153e-4d19-4dc2-800c-b1282feb155d

View File

@ -1,5 +1,4 @@
\input texinfo @c -*-texinfo-*-
@c $Id: jabber.texi,v 1.13 2004/04/02 19:36:09 legoscia Exp $
@c %**start of header
@setfilename jabber.info
@settitle jabber.el manual 0.5
@ -845,3 +844,7 @@ to change the behaviour of downstream functions.
@printindex cp
@bye
@ignore
arch-tag: 995bf3da-0e87-4b15-895a-1e85fac139a2
@end ignore