X-Git-Url: http://git.shiar.nl/sheet.git/blobdiff_plain/40affe00ed4dbe9612e6c53c35444b7ecae7b079..16b530ef1bda793f687168797b982d2c504efc81:/termcol.plp

diff --git a/termcol.plp b/termcol.plp
index b3bb7b5..92bc4f8 100644
--- a/termcol.plp
+++ b/termcol.plp
@@ -128,7 +128,10 @@ for my $term (@termlist) {
 	}
 
 	if (my $palette = $info->{list}) {
-		my $colours = colorder($palette, $get{v} && $info->{ansiorder});
+		my $order = $get{v} && 'ansiorder';
+		my $colours = colorder($palette,
+			$info->{$order} // $palettes->{ $info->{parent} }->{$order}
+		);
 
 		my $rows = 8;
 		my $columns = ceil(@{$palette} / $rows);
@@ -148,7 +151,9 @@ for my $term (@termlist) {
 		}
 
 		for (@draw) {
-			my $imgpal = colorder($palette, $info->{ansiorder});
+			my $imgpal = colorder($palette,
+				$info->{ansiorder} // $palettes->{ $info->{parent} }->{ansiorder}
+			);
 			print "<tr><td colspan=$columns>", img_egapal($imgpal, @{$_});
 		}
 		print "</table>\n\n";