;;;; cl-scopes/lib/auth/web - authentication web interface

(defpackage :scopes-auth/web
  (:use :common-lisp)
  (:local-nicknames (:auth :scopes-auth)
                    (:config :scopes/config)
                    (:core :scopes/core)
                    (:util :scopes/util))
  (:export #:login))

(in-package :scopes-auth/web)

(defun login (ctx msg)
  (core:echo ctx msg))