[or-cvs] Do not mark missing translations as bad if the original its...

[weasel@xxxxxxxx (Peter Palfrader)]

Update of /home/or/cvsroot/website/include
In directory moria:/tmp/cvs-serv6593/include

Modified Files:
	functions.wmi 
Log Message:
Do not mark missing translations as bad if the original itself is obsolete

Index: functions.wmi
===================================================================
RCS file: /home/or/cvsroot/website/include/functions.wmi,v
retrieving revision 1.4
retrieving revision 1.5
diff -u -d -r1.4 -r1.5
--- functions.wmi	5 Oct 2005 02:05:59 -0000	1.4
+++ functions.wmi	5 Oct 2005 02:13:04 -0000	1.5
@@ -62,4 +62,10 @@
 	return (translation_get_masterrevision() eq translation_get_basedonrevision());
 };
 
+sub file_is_obsolete($$) {
+	my ($lang, $page) = @_;
+	%translation = getMetadata("$lang/$page");
+	return (exists $translation{'Status'} && ($translation{'Status'} eq 'obsolete'))
+};
+
 :>