amigaos4: use CONSOLE:, not VMS sys$command
authorAndy Broad <andy@broad.ology.org.uk>
Wed, 2 Mar 2016 23:45:52 +0000 (18:45 -0500)
committerJarkko Hietaniemi <jhi@iki.fi>
Thu, 3 Mar 2016 00:44:06 +0000 (19:44 -0500)
lib/perl5db.pl

index 68f7e50..67ad3d1 100644 (file)
@@ -1548,6 +1548,14 @@ We then determine what the console should be on various systems:
         $console = "con";
     }
 
+=item * AmigaOS - use C<CONSOLE:>.
+
+=cut
+
+    elsif ( $^O eq 'amigaos' ) {
+        $console = "CONSOLE:";
+    }
+
 =item * VMS - use C<sys$command>.
 
 =cut