X-Git-Url: https://git.librecmc.org/?a=blobdiff_plain;f=scripts%2Fadam2flash-502T.pl;h=0ed296d60f1e86b246ee4ac715d220616ccaa763;hb=ac44b053c8e7bbcbe43ffd415894a85dbaf52cce;hp=6d1bf3ce1b5e3e38a74dc04a2ca9e9065c58a347;hpb=7e83cf568adda47d200a398594a8a603fa08792a;p=librecmc%2Flibrecmc.git

diff --git a/scripts/adam2flash-502T.pl b/scripts/adam2flash-502T.pl
index 6d1bf3ce1b..0ed296d60f 100644
--- a/scripts/adam2flash-502T.pl
+++ b/scripts/adam2flash-502T.pl
@@ -1,4 +1,4 @@
-#!/usr/bin/perl
+#!/usr/bin/env perl
 #
 #   D-Link DSL-502T flash utility
 #
@@ -257,7 +257,7 @@ print STDERR "checking hardware.. ";
 my $prd = $ftp->getenv("ProductID");
 my $usb = $ftp->getenv("usb_prod");
 print STDERR "$prd / $usb.\n";
-($prd eq "AR7RD") or die "doesn't look like a DSL-502T?";
+($prd eq "AR7RD" || $prd eq "AR7DB") or die "doesn't look like a DSL-502T?";
 ($usb eq "DSL-502T") or die "doesn't look like a DSL-502T?";
 
 #