[elpa] externals/websocket d34f5f095d 070/114: Update version to 1.10.

[ELPA Syncer]

branch: externals/websocket
commit d34f5f095dced553eb3f30924a22a88e6763f4b4
Author: Andrew Hyatt <ahyatt@gmail.com>
Commit: Andrew Hyatt <ahyatt@gmail.com>

    Update version to 1.10.
    
    Minor formatting fix in websocket-server-accept.
---
 websocket.el | 18 +++++++++---------
 1 file changed, 9 insertions(+), 9 deletions(-)

diff --git a/websocket.el b/websocket.el
index b0ba1938fc..860cf2e2cd 100644
--- a/websocket.el
+++ b/websocket.el
@@ -4,7 +4,7 @@
 
 ;; Author: Andrew Hyatt <ahyatt@gmail.com>
 ;; Keywords: Communication, Websocket, Server
-;; Version: 1.9
+;; Version: 1.10
 ;; Package-Requires: ((cl-lib "0.5"))
 ;;
 ;; This program is free software; you can redistribute it and/or
@@ -99,7 +99,7 @@ same for the protocols."
   accept-string
   (inflight-input nil))
 
-(defvar websocket-version "1.9"
+(defvar websocket-version "1.10"
   "Version numbers of this version of websocket.el.")
 
 (defvar websocket-debug nil
@@ -913,13 +913,13 @@ connection, which should be kept in order to pass to
     (process-put client :websocket ws)
     (set-process-coding-system client 'binary 'binary)
     (set-process-sentinel client
-     (lambda (process change)
-       (let ((websocket (process-get process :websocket)))
-         (websocket-debug websocket "State change to %s" change)
-         (when (and
-                (member (process-status process) '(closed failed exit signal))
-                (not (eq 'closed (websocket-ready-state websocket))))
-           (websocket-try-callback 'websocket-on-close 'on-close 
websocket)))))))
+                          (lambda (process change)
+                            (let ((websocket (process-get process :websocket)))
+                              (websocket-debug websocket "State change to %s" 
change)
+                              (when (and
+                                     (member (process-status process) '(closed 
failed exit signal))
+                                     (not (eq 'closed (websocket-ready-state 
websocket))))
+                                (websocket-try-callback 'websocket-on-close 
'on-close websocket)))))))
 
 (defun websocket-create-headers (url key protocol extensions 
custom-headers-alist)
   "Create connections headers for the given URL, KEY, PROTOCOL, and EXTENSIONS.