From f6b68e76bf29420efb290ce93f4f62d38dec8aab Mon Sep 17 00:00:00 2001 From: Shivank Kacker Date: Fri, 7 Jun 2024 11:43:30 +0530 Subject: [PATCH] Added label to painscale preview --- .../Pain/CriticalCare__PainInputModal.res | 20 +++++++++++++++++-- 1 file changed, 18 insertions(+), 2 deletions(-) diff --git a/src/Components/CriticalCareRecording/Pain/CriticalCare__PainInputModal.res b/src/Components/CriticalCareRecording/Pain/CriticalCare__PainInputModal.res index 0946e7d8163..3ee3a2d8d2a 100644 --- a/src/Components/CriticalCareRecording/Pain/CriticalCare__PainInputModal.res +++ b/src/Components/CriticalCareRecording/Pain/CriticalCare__PainInputModal.res @@ -134,8 +134,24 @@ let make = ( :
-
+
{str(Belt.Float.toString(painScale))} +
color + }, + ), + (), + )}> + {str( + switch getLabels(Belt.Float.toInt(painScale)) { + | (label, _) => label + }, + )} +
{str("Pain Scale")}
@@ -159,7 +175,7 @@ let make = ( ?