From ece56ec14833b5aa0a31e26a18a95fc26a3c1b2d Mon Sep 17 00:00:00 2001
From: ggodart <giles@godartbrown.co.uk>
Date: Fri, 8 Jan 2021 15:03:46 +0000
Subject: [PATCH] vsDB fix for numeric sort v1

---
 lib/vsDB.pm | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

diff --git a/lib/vsDB.pm b/lib/vsDB.pm
index 8c53a7b05..ddd21e0d2 100644
--- a/lib/vsDB.pm
+++ b/lib/vsDB.pm
@@ -584,10 +584,11 @@ sub Sort {
     # obj->Sort($field);
     # if $field is ommited, or an invalid fieldname is used, defaults to
     # the left-most column.
-
+    # $sortMode 0 = alpha ascending, 1 = alpha descending, 2 = numeric ascending, 3 = numeric descending
+	
     my ($this)      = shift;
     my ($fieldName) = shift || '0';
-    my ($desc)      = shift || '0';
+    my ($sortMode)      = shift || '0';
     my ($delimiter) = $this->{'delimiter'};
 
     # can't append once we've changed the sort order