From a438f17ec420105e51acb4a8463883173f86289d Mon Sep 17 00:00:00 2001
From: Khaled Al-Shamaa <khaled.alshamaa@gmail.com>
Date: Tue, 9 Feb 2021 23:47:22 +0200
Subject: [PATCH] Fix degree symbol in dd2dms and UTF-8 issue

---
 ICARDA_VBA_Toolkit.bas | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/ICARDA_VBA_Toolkit.bas b/ICARDA_VBA_Toolkit.bas
index 2b662a5..c956b6d 100644
--- a/ICARDA_VBA_Toolkit.bas
+++ b/ICARDA_VBA_Toolkit.bas
@@ -151,7 +151,7 @@ Public Function DD2DMS(decStr As String) As Variant
     Seconds = Round((((decStr - Degrees) * 60) - Minutes) * 60, 4)
     
     outStr = ""
-    If (Degrees > 0) Then outStr = Degrees & "°"
+    If (Degrees > 0) Then outStr = Degrees & Chr(176)
     
     If (Minutes >= 10) Then
         outStr = outStr & Minutes & "'"