Project files for telepathy backend

* Project.ede (target autoloads): added telepathy
* telepathy/Project.ede: new file; project file for telepathy
  sub-directory
* telepathy/rudel-telepathy.el (header): updated copyright; updated
  version
  (rudel-telepathy-backend::initialize-instance): removed &rest from
  slots argument
* rudel-compile.el (top level autoloads): 
  (top level): added telepathy sub-directory

ChangeLog

@@ -1,3 +1,31 @@
+2010-03-14  Jan Moringen  <scymtym@users.sourceforge.net>
+
+	Project files for telepathy backend
+	* Project.ede (target autoloads): added telepathy
+	* telepathy/Project.ede: new file; project file for telepathy
+	sub-directory
+	* telepathy/rudel-telepathy.el (header): updated copyright;
+	updated version
+	(rudel-telepathy-backend::initialize-instance): removed &rest from
+	slots argument
+	* rudel-compile.el (top level autoloads):
+	(top level): added telepathy sub-directory
+
+	Removed &rest from initialize-instance in obby/rudel-obby.el
+	* obby/rudel-obby.el (rudel-obby-backend::initialize-instance):
+	removed &rest from slots arguments
+
+2010-03-12  Jan Moringen  <scymtym@users.sourceforge.net>
+
+	Ensure self user is present in after sync in obby backend
+	* obby/rudel-obby-client.el (rudel-obby/obby_sync_final): switch
+	to we-finalized when the self user is missing
+
+	Updated copyright, year and version in reference card
+	* doc/card.tex (header): updated version and copyright
+        (constants): updated version and copyright
+	* doc/card.pdf: regenerated
+
 2010-03-10  Jan Moringen  <scymtym@users.sourceforge.net>
 
 	Improved some error messages in infinote backend

Project.ede

@@ -9,7 +9,7 @@
     :name "autoloads"
     :path ""
     :autoload-file "rudel-loaddefs.el"
-    :autoload-dirs '("." "jupiter" "adopted" "socket" "tls" "xmpp" "obby" "infinote" "wave" "zeroconf")
+    :autoload-dirs '("." "jupiter" "adopted" "socket" "tls" "xmpp" "telepathy" "obby" "infinote" "wave" "zeroconf")
     )
    (ede-proj-target-elisp "compile"
     :name "rudel"

rudel-compile.el

@@ -57,7 +57,7 @@
        (subdirs   (mapcar
 		   (lambda (subdir)
 		     (concat rudel-dir subdir))
-		   '("." "jupiter" "adopted" "socket" "tls" "xmpp" "obby" "infinote" "zeroconf"))))
+		   '("." "jupiter" "adopted" "socket" "tls" "xmpp" "telepathy" "obby" "infinote" "zeroconf"))))
     ;; Adjust load path. We need to have all Rudel subdirectories on
     ;; the load path.
     (dolist (subdir subdirs)
@@ -68,7 +68,7 @@
        (subdirs   (mapcar
 		   (lambda (subdir)
 		     (concat rudel-dir subdir))
-		   '("." "jupiter" "adopted" "socket" "tls" "xmpp" "obby" "infinote" "zeroconf")))
+		   '("." "jupiter" "adopted" "socket" "tls" "xmpp" "telepathy" "obby" "infinote" "zeroconf")))
        (loaddefs  (concat rudel-dir "rudel-loaddefs.el")))
 
   (flet ((byte-compile-cl-warn (&rest) nil))

telepathy/Project.ede

@@ -0,0 +1,13 @@
+;; Object telepathy
+;; EDE project file.
+(ede-proj-project "rudel/telepathy"
+  :name "telepathy"
+  :file "Project.ede"
+  :targets (list
+   (ede-proj-target-elisp "telepathy"
+    :name "telepathy"
+    :path ""
+    :source '("rudel-telepathy.el")
+    )
+   )
+  )

telepathy/rudel-telepathy.el

@@ -1,6 +1,6 @@
 ;;; rudel-telepathy.el --- A telepathy backend for Rudel
 ;;
-;; Copyright (C) 2008, 2009 Jan Moringen
+;; Copyright (C) 2008, 2009, 2010 Jan Moringen
 ;;
 ;; Author: Jan Moringen <scymtym@users.sourceforge.net>
 ;; Keywords: Rudel, telepathy, backend
@@ -19,19 +19,19 @@
 ;; General Public License for more details.
 ;;
 ;; You should have received a copy of the GNU General Public License
-;; along with rudel. If not, see <http://www.gnu.org/licenses>.
+;; along with Rudel. If not, see <http://www.gnu.org/licenses>.
 
 
 ;;; Commentary:
 ;;
 ;; This file contains a Rudel backend which realizes session
 ;; initiation and transport of Rudel data through freedesktop's
-;; Telepathy framework.
+;; Telepathy framework (http://telepathy.freedesktop.org).
 
 
 ;;; History:
 ;;
-;; 0.1 - Initial revision.
+;; 0.1 - Initial version
 
 
 ;;; Code:
@@ -57,7 +57,7 @@
   ((capabilities :initform '()))
   "Class rudel-telepathy-backend ")
 
-(defmethod initialize-instance ((this rudel-telepathy-backend) &rest slots)
+(defmethod initialize-instance ((this rudel-telepathy-backend) slots)
   "Initialize slots of THIS according to SLOTS."
   (when (next-method-p)
     (call-next-method))