diff options
-rw-r--r-- | ksh-scan3.el | 5 |
1 files changed, 2 insertions, 3 deletions
diff --git a/ksh-scan3.el b/ksh-scan3.el index 71506e8..7d25a74 100644 --- a/ksh-scan3.el +++ b/ksh-scan3.el @@ -114,9 +114,8 @@ ("AC" ,biometry-ac ,biometry-ac-age ,biometry-ac-percentile) ("FL" ,biometry-fl ,biometry-fl-age ,biometry-fl-percentile))) (princ "* Impression\n") - (princ (format "%s corresponding to a gestational age of %s\n\n" - (get-field scan) (get-field impression-gestational-age))) - (princ "Gestational age assigned as per biometry (CRL)\n\n") + (princ (format "%s gestational age assigned as per biometry (CRL)\n\n" + (get-field impression-gestational-age))) (seq-do 'single-line-org-entry `(("Menstrual age" . ,impression-menstrual-age) ("Corrected EDD" . ,impression-corrected-edd) |