branch: externals/dicom
commit 608963ef1475335d7466b50c38c5aaaeeb4cf98a
Author: Daniel Mendler <[email protected]>
Commit: Daniel Mendler <[email protected]>
Add date or series number to title
---
dicom.el | 6 +++++-
1 file changed, 5 insertions(+), 1 deletion(-)
diff --git a/dicom.el b/dicom.el
index c77798eb8b..297d7fe250 100644
--- a/dicom.el
+++ b/dicom.el
@@ -419,10 +419,14 @@ The command is specified as FMT string with ARGS."
(if (equal type "IMAGE")
(dicom--thumb level item)
(dicom--title level
- (format "%s %s" type
+ (format "%s %s %s" type
(or (alist-get 'StudyDescription item)
(alist-get 'SeriesDescription item)
(alist-get 'PatientName item)
+ "")
+ (or (alist-get 'StudyDate item)
+ (alist-get 'PatientBirthDate item)
+ (alist-get 'SeriesNumber item)
"")))
(dicom--item level item)))))
((listp v)
