From a1124053a72f9344d9c0b3b2462038454b672544 Mon Sep 17 00:00:00 2001
From: Axel Burri <axel@tty0.ch>
Date: Tue, 1 Mar 2016 19:31:43 +0100
Subject: [PATCH] btrbk: bugfix: sort numerically (low prio, affects only list
 output)

---
 btrbk | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/btrbk b/btrbk
index 03392c1..f2fba0c 100755
--- a/btrbk
+++ b/btrbk
@@ -3039,7 +3039,7 @@ MAIN:
           next if($config_subvol->{ABORTED});
           my $svol = $config_subvol->{svol} || die;
           my $snapshot_name = config_key($config_subvol, "snapshot_name") // die;
-          foreach my $snapshot (sort { $a->{cgen} cmp $b->{cgen} } get_snapshot_children($sroot, $svol)) {
+          foreach my $snapshot (sort { $a->{cgen} <=> $b->{cgen} } get_snapshot_children($sroot, $svol)) {
             my $snapshot_data = { type => "snapshot",
                                   status => ($snapshot->{cgen} == $svol->{gen}) ? "up-to-date" : undef,
                                   vinfo_prefixed_keys("source", $svol),