Baguette/authd
3
1
Fork 0
Code Issues Pull Requests Releases Wiki Activity

UX improvements in the LS client.

Browse Source 
Mostly display of errors or successes and the ability to log out.
This commit is contained in:
Luka Vandervelden 2019-12-08 00:16:01 +01:00
parent a2d633f4fb
commit 9dd31ded64
2 changed files with 56 additions and 10 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
client/index.ls
View File

@ -33,7 +33,11 @@ document.add-event-listener \DOMContentLoaded ->
user: model.user
token: model.token
on-model-update: -> projector.schedule-render!
on-model-update: ->
projector.schedule-render!
on-logout: ->
model.token := void
model.user := void
}
projector.schedule-render!

60
client/user-configuration-panel.ls
View File

@ -25,17 +25,29 @@ default-heading-renderer = (self) ->
full-name = get-full-name self
h \div.section {key: \heading} [
h \div.title.is-2 [ full-name ]
h \div.media [
h \div.media-content [
h \div.title.is-2 [ full-name ]
if full-name != self.user.login
h \div.title.is-3.subtitle [
self.user.login
if full-name != self.user.login
h \div.title.is-3.subtitle [
self.user.login
]
]
if self.on-logout
h \div.media-right [
h \a {
onclick: ->
self.on-logout!
} [ "Logout" ]
]
]
]
Fields = {
render-text-input: (token, auth-ws, key, inputs, model) ->
render-text-input: (token, auth-ws, key, inputs, model, on-request) ->
upload = ->
console.log "clickity click", key, inputs[key], inputs
return unless inputs[key]
@ -47,6 +59,7 @@ Fields = {
inputs[key] := void
on-request!
auth-ws.set-extra token, "profile", payload
h \div.field.has-addons {key: key} [
@ -79,6 +92,7 @@ UserConfigurationPanel = (args) ->
heading-renderer: args.heading-renderer || default-heading-renderer
on-model-update: args.on-model-update || ->
on-logout: args.on-logout || void
model: args.model || [
["fullName", "Full Name", "string"]
@ -105,6 +119,20 @@ UserConfigurationPanel = (args) ->
self.on-model-update!
auth-ws.add-event-listener \error, (message) ->
self.error := message.reason
self.on-model-update!
# Profile updates would be a \extra-updated, so this is specific to the
# password.
auth-ws.add-event-listener \user-edited, (message) ->
self.input["password.old"] := void
self.input["password.new"] := void
self.input["password.new2"] := void
self.success := "password"
self.on-model-update!
unless self.profile
auth-ws.socket.onopen = ->
auth-ws.get-extra self.token, "profile"
@ -131,7 +159,7 @@ UserConfigurationPanel = (args) ->
when "string", "image-url"
h \div.field { key: key } [
h \div.label [ label ]
Fields.render-text-input self.token, auth-ws, key, self.input, self.profile
Fields.render-text-input self.token, auth-ws, key, self.input, self.profile, (-> self.error := void)
]
]
]
@ -141,27 +169,35 @@ UserConfigurationPanel = (args) ->
h \div.box { key: \password } [
h \div.title.is-4 [ "Password" ]
h \div.label [ "Old #{label}" ]
h \div.label [ "Old password" ]
h \div.control [
h \input.input {
type: \password
value: self.input["password.old"]
oninput: (e) ->
self.input["password.old"] = e.target.value
}
if self.error == "invalid credentials"
h \div.help.is-danger [
"The old password was invalid!"
]
]
h \div.label [ "New #{label}" ]
h \div.label [ "New password" ]
h \div.control [
h \input.input {
type: \password
value: self.input["password.new"]
oninput: (e) ->
self.input["password.new"] = e.target.value
}
]
h \div.label [ "New #{label} (repeat)" ]
h \div.label [ "New password (repeat)" ]
h \div.field.has-addons [
h \div.control.is-expanded [
h \input.input {
type: \password
value: self.input["password.new2"]
oninput: (e) ->
self.input["password.new2"] = e.target.value
}
@ -176,11 +212,17 @@ UserConfigurationPanel = (args) ->
if self.input["password.new"] != self.input["password.new2"]
return
self.error := void
auth-ws.update-password self.user.login, self.input["password.old"], self.input["password.new"]
} [ "Update" ]
]
]
if self.success == "password"
h \div.help.is-success [
"Password successfully updated!"
]
]
if self.show-developer