[Top][All Lists]

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[elpa] externals/xelb 290f47a: Avoid autoloading an EIEIO method

From: Chris Feng
Subject: [elpa] externals/xelb 290f47a: Avoid autoloading an EIEIO method
Date: Sat, 19 Sep 2015 04:58:49 +0000

branch: externals/xelb
commit 290f47a0c106fbcaf4f6218916d32f5ab6006aa4
Author: Chris Feng <address@hidden>
Commit: Chris Feng <address@hidden>

    Avoid autoloading an EIEIO method
    * xcb.el:
    * xcb-type.el:
      Avoid autoloading xcb:-error-or-event-class->number.
 xcb-types.el |    2 ++
 xcb.el       |    1 -
 2 files changed, 2 insertions(+), 1 deletions(-)

diff --git a/xcb-types.el b/xcb-types.el
index 5233c54..53048f8 100644
--- a/xcb-types.el
+++ b/xcb-types.el
@@ -545,6 +545,8 @@ and the second the consumed length."
 (defclass xcb:-event (xcb:-struct)
   :documentation "Event type.")
+;; Implemented in 'xcb.el'
+(cl-defgeneric xcb:-error-or-event-class->number ((obj xcb:connection) class))
 (cl-defmethod xcb:marshal ((obj xcb:-event) connection &optional sequence)
   "Return the byte-array representation of event OBJ.
diff --git a/xcb.el b/xcb.el
index 8f96c5d..87f353c 100644
--- a/xcb.el
+++ b/xcb.el
@@ -637,7 +637,6 @@ Sync by sending a GetInputFocus request and waiting until 
it's processed."
         (accept-process-output process 1 nil 1)))
     (cl-decf (slot-value obj 'event-lock))))
 (cl-defmethod xcb:-error-or-event-class->number ((obj xcb:connection) class)
   "Return the error/event number of a error/event class CLASS."
   (unless (symbolp class) (setq class (eieio-class-name class)))

reply via email to

[Prev in Thread] Current Thread [Next in Thread]