$NetBSD$

--- src/modes/perlmode.c.orig	2000-07-21 18:42:56.000000000 +0200
+++ src/modes/perlmode.c	2003-05-15 14:10:20.000000000 +0200
@@ -156,9 +156,9 @@
     mode_util_set_slang_color ( "cmode", "illegal", COLOR_ILLEGAL, COLOR_ILLEGAL_FG, COLOR_ILLEGAL_BG );
     mode_util_set_slang_color ( "cmode", "debug", COLOR_DEBUG, COLOR_DEBUG_FG, COLOR_DEBUG_BG );
     mode_util_set_slang_color ( "perlmode", "variable", COLOR_VARIABLE, "brightcyan", "black" );
-    mode_util_set_slang_color ( "perlmode", "shell", COLOR_SHELL, "magneta", "black" );
+    mode_util_set_slang_color ( "perlmode", "shell", COLOR_SHELL, "magenta", "black" );
 #ifdef HIGHLIGHT_REGEXPS
-    mode_util_set_slang_color ( "perlmode", "regexp", COLOR_REGEXP, "magneta", "black" );
+    mode_util_set_slang_color ( "perlmode", "regexp", COLOR_REGEXP, "magenta", "black" );
 #endif /* HIGHLIGHT_REGEXPS */
 }
 
