Allow "." in queue names

This commit is contained in:
Ask Solem 2010-02-16 11:16:24 +01:00
parent 2559b8f41f
commit d92adb6296
5 changed files with 5 additions and 5 deletions

View File

@ -71,4 +71,4 @@ fi
sudo rabbitmqctl list_queues -p $VHOST name consumers| \
grep -v "^Listing" | grep -v "done.$" | \
perl -nle'($q, $s) = split; print("$q.value $s")'
perl -nle'($q, $s) = split; $q =~ s/\./_/g; print("$q.value $s")'

View File

@ -71,4 +71,4 @@ fi
sudo rabbitmqctl list_queues -p $VHOST | \
grep -v "^Listing" | grep -v "done.$" | \
perl -nle'($q, $s) = split; print("$q.value $s")'
perl -nle'($q, $s) = split; $q =~ s/\./_/g; print("$q.value $s")'

View File

@ -71,4 +71,4 @@ fi
sudo rabbitmqctl list_queues -p $VHOST name messages_unacknowledged | \
grep -v "^Listing" | grep -v "done.$" | \
perl -nle'($q, $s) = split; print("$q.value $s")'
perl -nle'($q, $s) = split; $q =~ s/\./_/g; print("$q.value $s")'

View File

@ -71,4 +71,4 @@ fi
sudo rabbitmqctl list_queues -p $VHOST name messages_uncommitted | \
grep -v "^Listing" | grep -v "done.$" | \
perl -nle'($q, $s) = split; print("$q.value $s")'
perl -nle'($q, $s) = split; $q =~ s/\./_/g; print("$q.value $s")'

View File

@ -71,4 +71,4 @@ fi
sudo rabbitmqctl list_queues -p $VHOST name memory | \
grep -v "^Listing" | grep -v "done.$" | \
perl -nle'($q, $s) = split; print("$q.value $s")'
perl -nle'($q, $s) = split; $q =~ s/\./_/g; print("$q.value $s")'