From 6eb1c4cff637caad5713dd3fb569dc460b59a579 Mon Sep 17 00:00:00 2001 From: Guillem Jover Date: Sun, 20 Mar 2022 12:08:35 +0100 Subject: dselect: Use qw() instead of lists of quoted strings --- dselect/setup | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) (limited to 'dselect/setup') diff --git a/dselect/setup b/dselect/setup index 3d4bc6309..cea4b9caf 100755 --- a/dselect/setup +++ b/dselect/setup @@ -31,10 +31,10 @@ my $config_file = '/etc/apt/sources.list'; my $boldon = color('bold'); my $boldoff = color('reset'); -my @known_types = ('deb'); -my @known_access = ('https', 'http', 'ftp', 'file'); -my @typical_distributions = ('stable', 'unstable', 'testing'); -my @typical_components = ('main', 'contrib', 'non-free', 'non-free-firmware'); +my @known_types = qw(deb); +my @known_access = qw(https http ftp file); +my @typical_distributions = qw(stable unstable testing); +my @typical_components = qw(main contrib non-free non-free-firmware); my %known_access = map {($_,$_)} @known_access; my %typical_distributions = map {($_,$_)} @typical_distributions; -- cgit v1.2.3-70-g09d2