From f6f84585ffc1b6e63b8625fcf7bad74405f209dd Mon Sep 17 00:00:00 2001
From: wp_xxyyzz <wp_xxyyzz@8e941d3f-bd1b-0410-a28a-d453659cc2b4>
Date: Tue, 27 Apr 2021 16:29:55 +0000
Subject: [PATCH] fpexif: Fix Exif tag $9290 ("SubSecTime").

git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@8004 8e941d3f-bd1b-0410-a28a-d453659cc2b4
---
 components/fpexif/fpeexifdata.pas | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/components/fpexif/fpeexifdata.pas b/components/fpexif/fpeexifdata.pas
index fe9b1a0dc..1feaf5fd7 100644
--- a/components/fpexif/fpeexifdata.pas
+++ b/components/fpexif/fpeexifdata.pas
@@ -420,7 +420,7 @@ begin
     AddUShortTag   (E+$9214, 'SubjectArea',               4, rsSubjectArea);
     AddBinaryTag   (E+$927C, 'MakerNote',                 1, rsMakerNote, '', '', TMakerNoteTag, true);
     AddBinaryTag   (E+$9286, 'UserComment',               1, rsUserComment, '', '', TUserCommentTag);
-    AddStringTag   (E+$9286, 'SubSecTime',                1, rsSubSecTime);
+    AddStringTag   (E+$9290, 'SubSecTime',                1, rsSubSecTime);
     AddStringTag   (E+$9291, 'SubSecTimeOriginal',        1, rsSubSecTimeOriginal);
     AddStringTag   (E+$9292, 'SubSecTimeDigitized',       1, rsSubSecTimeDigitized);
     AddURationalTag(E+$9400, 'Temperature',               1, rsTemperature);