Index: Document.pm
===================================================================
--- Document.pm	(Revision 729)
+++ Document.pm	(Arbeitskopie)
@@ -73,39 +73,39 @@
 #	f     => wxSTC_LEX_FORTRAN,
 	#     => wxSTC_LEX_VB, # What's the difference between VB and VBSCRIPT?
 
-# totally made-up MIME-types. 
+# partially made-up MIME-types; some parts extracted from /etc/mime.types
 # Someone should go over and see if there are official mime-type definitions
-# for the languages
+# missing from the languages list
 our %EXT_MIME = (
-	ada   => 'text/ada',
+	ada   => 'text/x-adasrc',
 	asm   => 'text/asm',
 	bat   => 'text/bat',
-	cpp   => 'text/cpp',
+	cpp   => 'text/x-c++src',
 	css   => 'text/css',
-	diff  => 'text/diff',
+	diff  => 'text/x-patch',
 	e     => 'text/eiffel',
-	f     => 'text/fortran',
+	f     => 'text/x-fortran',
 	html  => 'text/html',
 	js    => 'text/ecmascript',
 	json  => 'text/ecmascript',
 	latex => 'text/latex',
 	lsp   => 'text/lisp',
 	lua   => 'text/lua',
-	mak   => 'text/make',
+	mak   => 'text/x-makefile',
 	mat   => 'text/matlab',
-	pas   => 'text/pascal',
-	php   => 'text/php',
-	py    => 'text/python',
-	rb    => 'text/ruby',
-	sql   => 'text/sql',
-	tcl   => 'text/tcl',
+	pas   => 'text/x-pascal',
+	php   => 'application/x-php',
+	py    => 'text/x-python',
+	rb    => 'application/x-ruby',
+	sql   => 'text/x-sql',
+	tcl   => 'text/x-tcl',
 	vbs   => 'text/vbscript',
-	patch => 'text/diff',
-	pl    => 'text/perl',
-	plx   => 'text/perl',
-	pm    => 'text/perl',
-	pod   => 'text/perl',
-	t     => 'text/perl',
+	patch => 'text/x-patch',
+	pl    => 'application/x-perl',
+	plx   => 'application/x-perl',
+	pm    => 'application/x-perl',
+	pod   => 'application/x-perl',
+	t     => 'application/x-perl',
 	xml   => 'text/xml',
 	yml   => 'text/yaml',
 	yaml  => 'text/yaml',
@@ -113,46 +113,46 @@
 
 	pasm  => 'text/pasm',
 	pir   => 'text/pir',
-	p6    => 'text/perl6',
+	p6    => 'application/x-perl6',
 );
 
 our %MIME_CLASS = (
-	'text/perl'  => 'Padre::Document::Perl',
-	'text/perl6' => 'Padre::Document::Perl6',
+	'application/x-perl'  => 'Padre::Document::Perl',
+	'application/x-perl6' => 'Padre::Document::Perl6',
 	'text/pasm'  => 'Padre::Document::Pasm',
 	'text/pir'   => 'Padre::Document::Pir',
 );
 
 our %MIME_LEXER = (
-	'text/ada'        => wxSTC_LEX_ADA,
-	'text/asm'        => wxSTC_LEX_ASM,
-	'text/bat'        => wxSTC_LEX_BATCH,
-	'text/cpp'        => wxSTC_LEX_CPP,
-	'text/css'        => wxSTC_LEX_CSS,
-	'text/diff'       => wxSTC_LEX_DIFF,
-	'text/eiffel'     => wxSTC_LEX_EIFFEL,
-	'text/forth'      => wxSTC_LEX_FORTH,
-	'text/fortran'    => wxSTC_LEX_FORTRAN,
-	'text/html'       => wxSTC_LEX_HTML,
-	'text/ecmascript' => wxSTC_LEX_ESCRIPT,
-	'text/latex'      => wxSTC_LEX_LATEX,
-	'text/lisp'       => wxSTC_LEX_LISP,
-	'text/lua'        => wxSTC_LEX_LUA,
-	'text/make'       => wxSTC_LEX_MAKEFILE,
-	'text/matlab'     => wxSTC_LEX_MATLAB,
-	'text/pascal'     => wxSTC_LEX_PASCAL,
-	'text/perl'       => wxSTC_LEX_PERL,
-	'text/python'     => wxSTC_LEX_PYTHON,
-	'text/php'        => wxSTC_LEX_PHPSCRIPT,
-	'text/ruby'       => wxSTC_LEX_RUBY,
-	'text/sql'        => wxSTC_LEX_SQL,
-	'text/tcl'        => wxSTC_LEX_TCL,
-	'text/vbscript'   => wxSTC_LEX_VBSCRIPT,
-	'text/xml'        => wxSTC_LEX_XML,
-	'text/yaml'       => wxSTC_LEX_YAML,
-	'text/pir'        => wxSTC_LEX_CONTAINER,
-	'text/pasm'       => wxSTC_LEX_CONTAINER,
-	'text/perl6'      => wxSTC_LEX_CONTAINER,
+	'text/x-adasrc'       => wxSTC_LEX_ADA,
+	'text/asm'            => wxSTC_LEX_ASM,
+	'text/bat'            => wxSTC_LEX_BATCH,
+	'text/x-c++src'       => wxSTC_LEX_CPP,
+	'text/css'            => wxSTC_LEX_CSS,
+	'text/x-patch'        => wxSTC_LEX_DIFF,
+	'text/eiffel'         => wxSTC_LEX_EIFFEL,
+	'text/forth'          => wxSTC_LEX_FORTH,
+	'text/x-fortran'      => wxSTC_LEX_FORTRAN,
+	'text/html'           => wxSTC_LEX_HTML,
+	'text/ecmascript'     => wxSTC_LEX_ESCRIPT,
+	'text/latex'          => wxSTC_LEX_LATEX,
+	'text/lisp'           => wxSTC_LEX_LISP,
+	'text/lua'            => wxSTC_LEX_LUA,
+	'text/x-makefile'     => wxSTC_LEX_MAKEFILE,
+	'text/matlab'         => wxSTC_LEX_MATLAB,
+	'text/x-pascal'       => wxSTC_LEX_PASCAL,
+	'application/x-perl'  => wxSTC_LEX_PERL,
+	'text/x-python'       => wxSTC_LEX_PYTHON,
+	'application/x-php'   => wxSTC_LEX_PHPSCRIPT,
+	'application/x-ruby'  => wxSTC_LEX_RUBY,
+	'text/x-sql'          => wxSTC_LEX_SQL,
+	'text/x-tcl'          => wxSTC_LEX_TCL,
+	'text/vbscript'       => wxSTC_LEX_VBSCRIPT,
+	'text/xml'            => wxSTC_LEX_XML,
+	'text/yaml'           => wxSTC_LEX_YAML,
+	'text/pir'            => wxSTC_LEX_CONTAINER,
+	'text/pasm'           => wxSTC_LEX_CONTAINER,
+	'application/x-perl6' => wxSTC_LEX_CONTAINER,
 );
 
 our $DEFAULT_LEXER = wxSTC_LEX_AUTOMATIC;
