nostr/more-speech
1
0
Fork 0
mirror of https://github.com/unclebob/more-speech.git synced 2024-09-30 10:30:56 +00:00
Code Issues Packages Projects Releases Wiki Activity

Read user profile from relays after changing it.

Browse Source
This commit is contained in:
Robert C. Martin 2023-05-02 16:35:06 -05:00
parent 932d0ddcf9
commit 3247891069
3 changed files with 27 additions and 25 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
src/more_speech/migrator.clj
View File

@ -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"}))

4
src/more_speech/ui/swing/profile_window.clj
View File

@ -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))))

10
src/more_speech/ui/swing/relay_manager.clj
View File

@ -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,8 +65,8 @@
"<body>" body "</body>"))
(defn show-relay-info [url _e]
(let [relay-info (get-in @relays [url :relay-info])
html-doc (make-html-document
(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")
@ -85,7 +85,7 @@
:size [500 :by 600])]
(listen info-pane :hyperlink article-panel/open-link)
(pack! info-frame)
(show! info-frame)))
(show! info-frame))))
(defn make-relay-element
([url]