Compare commits
3 Commits
9f61ebca7c
...
21d2927e50
Author | SHA1 | Date | |
---|---|---|---|
21d2927e50 | |||
bf734205da | |||
ba14afda40 |
@ -1171,3 +1171,8 @@ audio.viewer-content {
|
||||
height: 20px;
|
||||
vertical-align: bottom;
|
||||
}
|
||||
|
||||
.thread-target .emoji-custom {
|
||||
height: 1.3em;
|
||||
vertical-align: top;
|
||||
}
|
||||
|
@ -254,7 +254,7 @@ searchAccounts client query limit resolve =
|
||||
Just client ->
|
||||
let
|
||||
qs =
|
||||
[ ( "q", query )
|
||||
[ ( "q", "@"++query )
|
||||
, ( "limit", toString limit )
|
||||
, ( "resolve"
|
||||
, if resolve then
|
||||
@ -262,11 +262,12 @@ searchAccounts client query limit resolve =
|
||||
else
|
||||
"false"
|
||||
)
|
||||
, ( "exclude_unreviewed", "false" )
|
||||
]
|
||||
in
|
||||
HttpBuilder.get ApiUrl.searchAccount
|
||||
HttpBuilder.get ApiUrl.search
|
||||
|> withClient client
|
||||
|> withBodyDecoder (Decode.list accountDecoder)
|
||||
|> withBodyDecoder (searchResultsDecoder)
|
||||
|> withQueryParams qs
|
||||
|> send (MastodonEvent << AutoSearch)
|
||||
|
||||
|
@ -31,7 +31,6 @@ module Mastodon.ApiUrl
|
||||
, unblock
|
||||
, uploadMedia
|
||||
, streaming
|
||||
, searchAccount
|
||||
, search
|
||||
)
|
||||
|
||||
@ -112,11 +111,6 @@ search =
|
||||
api2Prefix ++ "/search"
|
||||
|
||||
|
||||
searchAccount : String
|
||||
searchAccount =
|
||||
accounts ++ "search"
|
||||
|
||||
|
||||
relationships : String
|
||||
relationships =
|
||||
accounts ++ "relationships"
|
||||
@ -209,7 +203,7 @@ unfavourite (StatusId id) =
|
||||
|
||||
streaming : String
|
||||
streaming =
|
||||
apiPrefix ++ "/streaming/"
|
||||
apiPrefix ++ "/streaming"
|
||||
|
||||
|
||||
uploadMedia : String
|
||||
|
@ -59,7 +59,7 @@ type MastodonMsg
|
||||
| AccountUnblocked Account (MastodonResult Relationship)
|
||||
| AccountUnmuted Account (MastodonResult Relationship)
|
||||
| AppRegistered (MastodonResult AppRegistration)
|
||||
| AutoSearch (MastodonResult (List Account))
|
||||
| AutoSearch (MastodonResult SearchResults)
|
||||
| Blocks Bool (MastodonResult (List Account))
|
||||
| CurrentUser (MastodonResult Account)
|
||||
| FavoriteAdded (MastodonResult Status)
|
||||
|
@ -381,10 +381,10 @@ update msg ({ accountInfo, search } as model) =
|
||||
{ draft
|
||||
| showAutoMenu =
|
||||
Update.Draft.showAutoMenu
|
||||
decoded
|
||||
decoded.accounts
|
||||
draft.autoAtPosition
|
||||
draft.autoQuery
|
||||
, autoAccounts = decoded
|
||||
, autoAccounts = decoded.accounts
|
||||
}
|
||||
}
|
||||
-- Force selection of the first item after each
|
||||
|
@ -330,7 +330,7 @@ statusView context ({ account, content, media_attachments, reblog, mentions, pin
|
||||
[ Common.icon "fire"
|
||||
, a (accountLinkAttributes ++ [ class "reblogger" ])
|
||||
[ span [ class "display-name" ] <| Common.accountDisplayNameRich account ]
|
||||
, text " boosted"
|
||||
, text "boosted"
|
||||
]
|
||||
, Lazy.lazy3 statusView context reblog clickOpen
|
||||
]
|
||||
|
Loading…
Reference in New Issue
Block a user