Fixed ${GetTime} hour padding (bug #980)

git-svn-id: https://svn.code.sf.net/p/nsis/code/NSIS/trunk@7270 212acab6-be3b-0410-9dea-997c60f758d6
This commit is contained in:
anders_k 2021-06-09 20:33:12 +00:00
parent 82f466527f
commit b20cd55d96
2 changed files with 8 additions and 9 deletions

View file

@ -1146,17 +1146,14 @@ RefreshShellIcons
System::Call 'kernel32::FileTimeToSystemTime(*l,i)i(r3,r7)'
FileFunc_GetTime_convert:
System::Call '*$7(&i2,&i2,&i2,&i2,&i2,&i2,&i2,&i2)p(.r5,.r6,.r4,.r0,.r3,.r2,.r1,)'
System::Call '*$7(&i2.r5,&i2.r6,&i2.r4,&i2.r0,&i2.r3,&i2.r2,&i2.r1,&i2)'
System::Free $7
IntCmp $0 9 0 0 +2
StrCpy $0 '0$0'
IntCmp $1 9 0 0 +2
StrCpy $1 '0$1'
IntCmp $2 9 0 0 +2
StrCpy $2 '0$2'
IntCmp $6 9 0 0 +2
StrCpy $6 '0$6'
IntFmt $6 "%.2u" $6 ; Month
IntFmt $0 "%.2u" $0 ; Day
IntFmt $3 "%.2u" $3 ; Hour
IntFmt $2 "%.2u" $2 ; Minute
IntFmt $1 "%.2u" $1 ; Second
StrCmp $4 0 0 +3
StrCpy $4 Sunday