Skip to content

Commit

Permalink
Rename extractPaginationSpecification to specificationFromUrl
Browse files Browse the repository at this point in the history
  • Loading branch information
swistak35 committed Feb 11, 2024
1 parent a36af27 commit a7ec37e
Show file tree
Hide file tree
Showing 2 changed files with 4 additions and 4 deletions.
2 changes: 1 addition & 1 deletion ruby_event_store-browser/elm/src/Page/ShowStream.elm
Original file line number Diff line number Diff line change
Expand Up @@ -185,7 +185,7 @@ maybeHref link =
case link of
Just url ->
[ href url
, onClick (GoToPage (Pagination.extractPaginationSpecification url))
, onClick (GoToPage (Pagination.specificationFromUrl url))
]

Nothing ->
Expand Down
6 changes: 3 additions & 3 deletions ruby_event_store-browser/elm/src/Pagination.elm
Original file line number Diff line number Diff line change
@@ -1,4 +1,4 @@
module Pagination exposing (Specification, empty, extractPaginationSpecification)
module Pagination exposing (Specification, empty, specificationFromUrl)

import Regex

Expand All @@ -23,6 +23,6 @@ extractPaginationPart regexString link =
List.head (List.map extractStringFromMatch (Regex.find (Maybe.withDefault Regex.never (Regex.fromString regexString)) link))


extractPaginationSpecification : String -> Specification
extractPaginationSpecification link =
specificationFromUrl : String -> Specification
specificationFromUrl link =
Specification (extractPaginationPart "page%5Bposition%5D=([a-zA-Z0-9-]+)" link) (extractPaginationPart "page%5Bdirection%5D=([a-zA-Z0-9-]+)" link) (extractPaginationPart "page%5Bcount%5D=([a-zA-Z0-9-]+)" link)

0 comments on commit a7ec37e

Please sign in to comment.