[css2] Changed the properties database to include a field thats says whether

the property is CSS2 or CSS 2.1 and modified mkpropidx and Makefile
accordingly.

--HG--
extra : convert_revision : svn%3A73dc7c4b-06e6-40f3-b4f7-9ed1dbc14bfc/trunk%401898

Author: bert-github

css2/Makefile

@@ -1,6 +1,6 @@
 # Makefile to generate the CSS2 document based on its "source files"
 # Arnaud Le Hors - lehors@w3.org
-# $Id: Makefile,v 2.55 2002-07-08 14:57:49 bbos Exp $
+# $Id: Makefile,v 2.56 2002-07-25 20:28:24 bbos Exp $
 
 # what needs to be set for every new release:
 # Note use of full year (1998) in identifier.
@@ -395,7 +395,7 @@ indexlist.html: indexlist.srd build/indexlist.srb Project.cfg
 
 build/propidx.srb: $(PROPSRC)
 	@echo "=========== making" $@
-	$(MKPROPIDX) -r $@ $@ $(PROPSRC)
+	$(MKPROPIDX) -l 2.1 -r $@ $@ $(PROPSRC)
 
 propidx.srd:: build/propidx.srb #propidx.src
 #	@echo "=========== making" $@

css2/bin/mkpropidx

@@ -1,16 +1,23 @@
 #!/usr/local/bin/perl
 # Index of property names.
 # Arnaud Le Hors lehors@w3.org/Ian Jacobs ij@w3.org
-# $Id: mkpropidx,v 2.6 1998-05-13 10:59:07 bbos Exp $
+# $Id: mkpropidx,v 2.7 2002-07-25 20:28:24 bbos Exp $
 use English;
 
 
-if (($_ = $ARGV[0], /^-r/) && $ARGV[0]) {
+$realpath = ();
+
+while ($ARGV[0] =~ /^-/) {
+  if ($ARGV[0] eq "-r" && $ARGV[1]) {
     shift;
-    $realpath = $ARGV[0];
+    $realpath = shift;
+  } elsif ($ARGV[0] eq "-l" && $ARGV[1]) {
     shift;
-} else {
-    $realpath = ();
+    $level = shift;
+  } else {
+    print "Usage: $PROGNAME [-r realpath] [-l level] indexfile dbase\n";
+    exit 1;
+  }
 }
 
 $PROGNAME = substr($0, rindex($0, "/") + 1);
@@ -157,16 +164,18 @@ sub table_head {
 
 sub table_body {
     foreach $key (sort (keys %indexes)) {
-	($name, $val, $init, $app, $inh, $perc, $media) = split(/;;/, $indexes{$key});
-	print OUTPUT "<tr>";
-	format_name($name);
-	format_val($val);
-	format_init($init);
-	format_app($app);
-	format_inh($inh);
-	format_perc($perc);
-	format_media($media);
-	print OUTPUT "\n";
+	($name, $val, $init, $app, $inh, $perc, $media, $csslevels) = split(/;;/, $indexes{$key});
+        if (! defined $level || $csslevels =~ /\b$level\b/) {
+	  print OUTPUT "<tr>";
+	  format_name($name);
+	  format_val($val);
+	  format_init($init);
+	  format_app($app);
+	  format_inh($inh);
+	  format_perc($perc);
+	  format_media($media);
+	  print OUTPUT "\n";
+	}
     }
 }