diff options
| author | Jed Barber <jjbarber@y7mail.com> | 2017-02-13 18:27:13 +1100 |
|---|---|---|
| committer | Jed Barber <jjbarber@y7mail.com> | 2017-02-13 18:27:13 +1100 |
| commit | 2b8b55de4a18757e8d6769e458c84f7c1df1e261 (patch) | |
| tree | cbd62219babccc04e57fa7708f88385a7f6413d3 /src/stv.adb | |
| parent | 2b842cb65ce29071d5786bdecc834c026d1f2db2 (diff) | |
Swapped out crypto package for something smaller, revised other code and readme/notes slightly
Diffstat (limited to 'src/stv.adb')
| -rw-r--r-- | src/stv.adb | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/stv.adb b/src/stv.adb index 4f8ef5a..10020e6 100644 --- a/src/stv.adb +++ b/src/stv.adb @@ -255,12 +255,12 @@ begin Finish_Time := Simple_Time.Now; Log_Msg := SU.To_Unbounded_String ("Finished election count at " & Simple_Time.To_String (Finish_Time) & ASCII.LF & - Duration'Image (Finish_Time - Start_Time) & " seconds elapsed." & ASCII.LF); + Duration'Image (Finish_Time - Start_Time) & " seconds elapsed."); Open (Log_File, Append_File, SU.To_String (Main_Log)); Put_Line (Log_File, SU.To_String (Log_Msg)); Close (Log_File); if Verbose then - Put_Line (Standard_Error, SU.To_String (Log_Msg)); + Put_Line (Standard_Error, ASCII.LF & SU.To_String (Log_Msg)); end if; |