fix ex service node icon, and expansion

graphsense · Oct 22, 2024 · 7aee772 · 7aee772
1 parent a2f4af6
commit 7aee772
Show file tree

Hide file tree

Showing 3 changed files with 31 additions and 6 deletions.
diff --git a/src/Update/Pathfinder/AddressDetails.elm b/src/Update/Pathfinder/AddressDetails.elm
@@ -19,10 +19,10 @@ import Model.Pathfinder.Table.TransactionTable as TransactionTable
 import Msg.Pathfinder exposing (Msg(..))
 import Msg.Pathfinder.AddressDetails exposing (Msg(..))
 import RecordSetter exposing (..)
+import Tuple exposing (mapFirst)
 import Update.DateRangePicker as DateRangePicker
 import Update.Graph.Table
 import Update.Pathfinder.PagedTable as PT
-import Tuple exposing (mapFirst)
 
 
 update : Update.Config -> Pathfinder.Model -> Msg -> Id -> Model -> ( Model, List Effect )
@@ -269,7 +269,7 @@ update uc pathfinderModel msg id model =
 
         ResetDateRangePicker ->
             TransactionTable.initWithoutFilter model.addressId model.data
-            |> mapFirst (flip s_txs model)
+                |> mapFirst (flip s_txs model)
 
         BrowserGotFromDateBlock _ blockAt ->
             updateDatePickerRangeBlockRange uc pathfinderModel id model (blockAt.beforeBlock |> Maybe.map Set |> Maybe.withDefault NoSet) NoSet

diff --git a/src/Update/Pathfinder/WorkflowNextTxByTime.elm b/src/Update/Pathfinder/WorkflowNextTxByTime.elm
@@ -1,16 +1,17 @@
 module Update.Pathfinder.WorkflowNextTxByTime exposing (update)
 
 import Api.Data
+import Api.Request.Addresses exposing (Order_(..))
 import Effect.Api as Api
 import Effect.Pathfinder exposing (Effect(..))
+import Model.Direction exposing (Direction(..))
 import Model.Pathfinder exposing (Model)
 import Model.Pathfinder.Address as Address
 import Model.Pathfinder.Id as Id
 import Msg.Pathfinder exposing (Msg(..), WorkflowNextTxByTimeMsg(..), WorkflowNextTxContext)
 import RecordSetter as Rs
 import Set
 import Update.Pathfinder.Network as Network
-import Api.Request.Addresses exposing (Order_(..))
 
 
 update : WorkflowNextTxContext -> WorkflowNextTxByTimeMsg -> Model -> ( Model, List Effect )
@@ -26,9 +27,29 @@ update ctx msg model =
                     , direction = Just ctx.direction
                     , pagesize = 1
                     , nextpage = Nothing
-                    , order = Just Order_Asc
-                    , minHeight = blockAtDate.beforeBlock
-                    , maxHeight = Nothing
+                    , order =
+                        Just
+                            (case ctx.direction of
+                                Outgoing ->
+                                    Order_Asc
+
+                                Incoming ->
+                                    Order_Desc
+                            )
+                    , minHeight =
+                        case ctx.direction of
+                            Outgoing ->
+                                blockAtDate.beforeBlock
+
+                            Incoming ->
+                                Nothing
+                    , maxHeight =
+                        case ctx.direction of
+                            Outgoing ->
+                                Nothing
+
+                            Incoming ->
+                                blockAtDate.beforeBlock
                     }
                 |> ApiEffect
                 |> List.singleton

diff --git a/src/View/Pathfinder/Address.elm b/src/View/Pathfinder/Address.elm
@@ -30,6 +30,7 @@ import Theme.Html.GraphComponents as HtmlGraphComponents
 import Theme.Svg.GraphComponents as GraphComponents
 import Theme.Svg.Icons as Icons
 import Util.Annotations as Annotations
+import Util.Data exposing (isAccountLike)
 import Util.Graph exposing (decodeCoords, translate)
 import Util.View exposing (onClickWithStop, truncateLongIdentifierWithLengths)
 import View.Locale as Locale
@@ -370,6 +371,9 @@ getAddressType address cluster =
         else
             KnownService
 
+    else if (address.id |> Id.network |> isAccountLike) && (address.actor |> Maybe.Extra.isJust) then
+        KnownService
+
     else
         Unknown