[elpa] externals/xelb 65b2934 1/2: Fix the parsing of X11 properties

[Chris Feng]

branch: externals/xelb
commit 65b2934f69ffcb53906207b39d7624cb5cfc77de
Author: Chris Feng <address@hidden>
Commit: Chris Feng <address@hidden>

    Fix the parsing of X11 properties
    
    * xcb-icccm.el (xcb:icccm:-GetProperty~reply): Do not use the
    'bytes-after' field.
---
 xcb-icccm.el |    6 ++----
 1 file changed, 2 insertions(+), 4 deletions(-)

diff --git a/xcb-icccm.el b/xcb-icccm.el
index c7f3c12..c787161 100644
--- a/xcb-icccm.el
+++ b/xcb-icccm.el
@@ -128,12 +128,10 @@ according to BYTE-ARRAY.
 This method automatically format the value as 8, 16 or 32 bits array."
   (let ((retval (cl-call-next-method obj byte-array))
         tmp)
-    (with-slots (~lsb length format bytes-after value-len value) obj
+    (with-slots (~lsb length format value-len value) obj
       (if (or (= 0 value-len) (= 0 length))
           (setf value nil)              ;no available value
-        (setq tmp (substring value
-                             0          ;long-offset
-                             (- (length value) bytes-after))
+        (setq tmp value                 ;long-offset is always 0
               value nil)
         (pcase format
           (8