class Dry::Events::Bus

def subscribed?(listener)
  listeners.values.any? do |value|
    value.any? do |block, _|
      case listener
      when ::Proc   then block.equal?(listener)
      when ::Method then listener.owner == block.owner && listener.name == block.name
      end
    end
  end
end