 (def registered-user-sid
   {:sid {:user_authorization_type_sid {:user_authorization_type "REGISTERED"}}})
 
-(defn get-current-sids
+(defn- get-current-sids
   "Returns the groups the user who owns the token belongs to"
   [context token-id]
   (let [{:keys [username group_guids]} (get-token-or-error context token-id)]

(ns cmr.mock-echo.api.tokens
  "Defines the HTTP URL routes for tokens."
  (:require [compojure.core :refer :all]
            [cheshire.core :as json]
            [clojure.set :as set]
            [cmr.common.log :refer (debug info warn error)]
            [cmr.common.services.errors :as svc-errors]
            [cmr.mock-echo.data.token-db :as token-db]
            [cmr.mock-echo.api.api-helpers :as ah]))


(def token-keys

  (get-token-or-error context token-id)
  (token-db/delete context token-id))

(defn- get-token-info-mock
  [context token-id]
  (let [{:keys [username client_id id]} (get-token-or-error context token-id)]
    {:token_info {:user_name username
