diff --git a/Shorewall-core/lib.cli b/Shorewall-core/lib.cli
index d9226d579..a1b11becd 100644
--- a/Shorewall-core/lib.cli
+++ b/Shorewall-core/lib.cli
@@ -253,7 +253,14 @@ show_classifiers() {
 	if [ -n "$qdisc" ]; then
 	    echo Device $device:
 	    qt tc -s filter ls root dev $device && tc -s filter ls root dev $device | grep -v '^$'
-	    tc -s filter ls dev $device
+	    tc filter show dev $device
+	    tc class show dev $device | fgrep 'leaf ' | fgrep -v ' hfsc' | sed 's/^.*leaf //;s/ .*//' | while read class; do
+		if [ -n "$class" ]; then
+		    echo
+		    echo Node $class
+		    tc filter show dev $device parent $class
+		fi
+	    done
 	    echo
 	fi
     }