mirror of
https://github.com/unclebob/more-speech.git
synced 2024-09-30 10:30:56 +00:00
Read user profile from relays after changing it.
This commit is contained in:
parent
932d0ddcf9
commit
3247891069
@ -30,7 +30,7 @@
|
||||
:private-key (util/bytes->hex-string private-key)})
|
||||
(println "A private and public key have been generated for you.")
|
||||
(println "Your temporary user name is: " temp-user-name)
|
||||
(println "Please edit private/keys to change it."))
|
||||
(println "Please go to Manage->Profile to change it."))
|
||||
)
|
||||
(when-not (file-exists? @config/nicknames-filename)
|
||||
(spit @config/nicknames-filename {16r2ef93f01cd2493e04235a6b87b10d3c4a74e2a7eb7c3caf168268f6af73314b5 "unclebobmartin"}))
|
||||
|
@ -6,6 +6,7 @@
|
||||
[more-speech.mem :refer :all]
|
||||
[more-speech.nostr.elliptic-signature :as es]
|
||||
[more-speech.nostr.event-composers :as event-composers]
|
||||
[more-speech.nostr.protocol :as protocol]
|
||||
[more-speech.nostr.util :as util])
|
||||
(:use (seesaw [core])))
|
||||
|
||||
@ -160,7 +161,8 @@
|
||||
:nip05 nip05
|
||||
:lud16 lud16})
|
||||
(data-storage/write-keys (get-mem :keys))
|
||||
(future (event-composers/compose-and-send-metadata-event)))
|
||||
(future (event-composers/compose-and-send-metadata-event)
|
||||
(protocol/request-profiles-and-contacts-for [public-key])))
|
||||
|
||||
(close-profile-frame (select (get-mem :frame) [:#profile-menu]) nil)
|
||||
(dispose! profile-frame))))
|
||||
|
@ -1,13 +1,13 @@
|
||||
(ns more-speech.ui.swing.relay-manager
|
||||
(:use [seesaw core])
|
||||
(:require
|
||||
[more-speech.config :as config]
|
||||
[more-speech.data-storage :as data-storage]
|
||||
[more-speech.mem :refer :all]
|
||||
[more-speech.nostr.protocol :as protocol]
|
||||
[more-speech.config :as config]
|
||||
[more-speech.nostr.relays :as relays]
|
||||
[more-speech.nostr.util :as util]
|
||||
[more-speech.ui.swing.article-panel :as article-panel])
|
||||
(:use (seesaw [core]))
|
||||
(:import (java.awt Point)
|
||||
(java.util Timer TimerTask)))
|
||||
|
||||
@ -65,27 +65,27 @@
|
||||
"<body>" body "</body>"))
|
||||
|
||||
(defn show-relay-info [url _e]
|
||||
(let [relay-info (get-in @relays [url :relay-info])
|
||||
html-doc (make-html-document
|
||||
config/editor-pane-stylesheet
|
||||
(str "<h2> Name:</h2>" (get relay-info "name")
|
||||
"<h2> Description: </h2>" (get relay-info "description")
|
||||
"<h2> Pubkey: </h2>" (get relay-info "pubkey")
|
||||
"<h2> Contact: </h2>" (get relay-info "contact")
|
||||
"<h2> Software: </h2>" (get relay-info "software") " V:" (get relay-info "version")
|
||||
)
|
||||
)
|
||||
info-pane (editor-pane
|
||||
:content-type "text/html"
|
||||
:editable? false
|
||||
:id :article-area
|
||||
:text html-doc)
|
||||
info-frame (frame :title (str "Relay info for " (relays/get-domain-name url))
|
||||
:content (scrollable info-pane)
|
||||
:size [500 :by 600])]
|
||||
(listen info-pane :hyperlink article-panel/open-link)
|
||||
(pack! info-frame)
|
||||
(show! info-frame)))
|
||||
(when-let [relay-info (get-in @relays [url :relay-info])]
|
||||
(let [html-doc (make-html-document
|
||||
config/editor-pane-stylesheet
|
||||
(str "<h2> Name:</h2>" (get relay-info "name")
|
||||
"<h2> Description: </h2>" (get relay-info "description")
|
||||
"<h2> Pubkey: </h2>" (get relay-info "pubkey")
|
||||
"<h2> Contact: </h2>" (get relay-info "contact")
|
||||
"<h2> Software: </h2>" (get relay-info "software") " V:" (get relay-info "version")
|
||||
)
|
||||
)
|
||||
info-pane (editor-pane
|
||||
:content-type "text/html"
|
||||
:editable? false
|
||||
:id :article-area
|
||||
:text html-doc)
|
||||
info-frame (frame :title (str "Relay info for " (relays/get-domain-name url))
|
||||
:content (scrollable info-pane)
|
||||
:size [500 :by 600])]
|
||||
(listen info-pane :hyperlink article-panel/open-link)
|
||||
(pack! info-frame)
|
||||
(show! info-frame))))
|
||||
|
||||
(defn make-relay-element
|
||||
([url]
|
||||
|
Loading…
Reference in New Issue
Block a user