Skip to content

Commit

Permalink
tweak
Browse files Browse the repository at this point in the history
  • Loading branch information
sullyj3 committed Aug 4, 2024
1 parent 3fad528 commit 3508921
Showing 1 changed file with 2 additions and 2 deletions.
4 changes: 2 additions & 2 deletions src/Client.lean
Original file line number Diff line number Diff line change
Expand Up @@ -17,8 +17,6 @@ def withUnixSocket path (action : Socket → IO a) := do

open System (FilePath)

def unlines := String.intercalate "\n"

def showTimer (now : Moment) : TimerInfoForClient → String
| {id, state} =>
match state with
Expand All @@ -30,6 +28,8 @@ def showTimer (now : Moment) : TimerInfoForClient → String
let formatted := remaining.formatColonSeparated
s!"#{repr id.id} | {formatted} remaining (PAUSED)"

def unlines := String.intercalate "\n"

def showTimers (timers : List TimerInfoForClient) (now : Moment) : String :=
if timers.isEmpty then
"No running timers."
Expand Down

0 comments on commit 3508921

Please sign in to comment.