     # This method is supposed to be called when a session engine asks
     # the storage to suspend a session with the specified session ID.
     # The session may or may not exist. Please refer to the `Connect`.
-    set: (sid, session, callback) ->
+    # The backing storage in use is Redis via the `RedisClient` class.
+    this::set = this::writeSession = (sid, session, callback) ->
         assert encoded = try JSON.stringify session
         assert _.isString qualified = @namespaced sid
         expire = session?.cookie?.maxAge / 1000 | 0

    # This method is supposed to be called when a session engine asks
    # the storage to retrieve a session with the specified session ID.
    # The session may or may not exist. Please refer to the `Connect`.
    get: (sid, callback) ->
        assert _.isString qualified = @namespaced sid
        message = "Redis session engine error at get"
        df = "failed to decode JSON payload on the get"
        assert _.isObject(@redis), "no Redis client yet"
        @redis.get qualified, (error, data, trailings...) =>
            @emit "session-get", sid, data, callback
            logger.error message.red, error if error
            return callback.call this, error if error
            return callback.call this unless data

    # This method is supposed to be called when a session engine asks
    # the storage to destroy a session with the specified session ID.
    # The session may or may not exist. Please refer to the `Connect`.
    # The backing storage in use is Redis via the `RedisClient` class.
    this::destory = this::destroySession = (sid, callback) ->
        assert _.isString qualified = @namespaced sid
        assert _.isObject(@redis), "no Redis client yet"
        message = "Redis session engine error at destroy"
        process = "Destroying a Redis stored session %s"
        assert kernel = @kernel or GraniteKernel.instance
        logger.debug process.grey, try sid.underline or 0
        assert _.isArray hosting = [this, kernel] or null
        forward = => h.emit arguments... for h in hosting
        @redis.del qualified, (error, trailings...) =>
            forward "session-destroy", this, sid, error
            logger.error message.red, error if error
            return callback.call this, error if error
            return callback.apply this, arguments
