         for addedQss in qsStringsDiff.added
             if addedQss not of @_requestersByQs
                 @_requestersByQs[addedQss] = {}
+                @_incChanges @parseQs(addedQss).modelName, addedQss, 1
                 requestsChanged = true
             @_requestersByQs[addedQss][computation._id] = computation
 

            delete @_requestersByQs[deletedQss][computation._id]
            if _.isEmpty @_requestersByQs[deletedQss]
                delete @_requestersByQs[deletedQss]
                requestsChanged = true

        if requestsChanged and not @_requestsChanged



_.extend J.fetching,
    _incChanges: (modelName, qss, inc) ->
        @_changesByModelQs[modelName] ?= {}
        newValue = (@_changesByModelQs[modelName][qss] ? 0) + inc
        if newValue is 0
            delete @_changesByModelQs[modelName][qss]
        else
            @_changesByModelQs[modelName][qss] = newValue

    _addComputationQsRequest: (computation, qs) ->
        qsString = @stringifyQs qs

