Browse code

Removing obsolete pages and includes

hiromipaw authored on 07/09/2017 17:45:43
Showing 1 changed files
1 1
deleted file mode 100644
... ...
@@ -1,146 +0,0 @@
1
-#! /usr/bin/wml
2
-<: use strict; :>
3
-<: use warnings; :>
4
-#use "perl-globals.wmi"
5
-#use "links.wmi"
6
-#use "versions.wmi"
7
-#use "navigation.wmi"
8
-
9
-<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
10
-<html>
11
-<head>
12
-  <title>$(TITLE)</title>
13
-  <link rel="shortcut icon" type="image/x-icon" href="$(IMGROOT)/favicon.ico">
14
-  <ifneq "$(REDIRECT)" "" "<meta http-equiv="refresh" content="0;url=$(DOCROOT)/$(REDIRECT)">">
15
-  <ifneq "$(REDIRECT_GLOBAL)" "" "<meta http-equiv="refresh" content="0;url=$(REDIRECT_GLOBAL)">">
16
-
17
-  # begin WML to generate css/js paths
18
-  <ifneq "$(STYLESHEET)" "" "<link rel="stylesheet" type="text/css" href="$(DOCROOT)/$(STYLESHEET)">">
19
-  <ifeq "$(STYLESHEET)" "" "<link rel="stylesheet" type="text/css" href="$(DOCROOT)/css/master.min.css">">
20
-
21
-  <link href="$(DOCROOT)/css/thankyou.min.css" rel="stylesheet" type="text/css">
22
-  <!--[if lte IE 8]>
23
-  <link rel="stylesheet" type="text/css" href="$(DOCROOT)/css/ie8-and-down.min.css">
24
-  <![endif]-->
25
-  <!--[if lte IE 7]>
26
-  <link rel="stylesheet" type="text/css" href="$(DOCROOT)/css/ie7-and-down.min.css">
27
-  <![endif]-->
28
-  <!--[if IE 6]>
29
-  <link rel="stylesheet" type="text/css" href="$(DOCROOT)/css/ie6.min.css">
30
-  <![endif]-->
31
-#  <script language="javascript" type="text/javascript" src="$(DOCROOT)/global.js"></script>
32
-  # end WML to generate css/js paths
33
-
34
-  <meta http-equiv="Content-Type" content="text/html; charset=UTF-8">
35
-  <meta name="author" content="The Tor Project, Inc.">
36
-  <meta name="keywords" content="anonymity online, tor, tor project, censorship circumvention, traffic analysis, anonymous communications research">
37
-<script type="text/javascript" src="$(DOCROOT)/js/jquery.min.js" charset="utf-8"></script>
38
-<script type="text/javascript" src="$(DOCROOT)/js/jquery.infieldlabel.min.js" charset="utf-8"></script>
39
-<script type="text/javascript" src="$(DOCROOT)/js/functions.min.js" charset="utf-8"></script>
40
-</head>
41
-<body>
42
-<div id="wrap">
43
-  <div id="header">
44
-    <h1 id="logo"><a href="<page index>">Tor</a></h1>
45
-      # navigation menu generation
46
-      <div id="nav">
47
-        <ul>
48
-        <:{
49
-            # create a hash and maintain order of keys
50
-            my %navigation;
51
-            my @keys;
52
-            while (@navigation) {
53
-              my $key = shift @navigation;
54
-              my $val = shift @navigation;
55
-              push @keys, $key;
56
-              $navigation{$key} = $val;
57
-            }
58
-
59
-            my $page = $WML_SRC_BASENAME;
60
-            my $lang = "$(LANG)";
61
-
62
-            for my $key (@keys) {
63
-              my ($dir, $base) = $key =~ m,^(?:(.*)/)?(.*?)$,;
64
-
65
-              # in directory of active link, set class active
66
-              my $class;
67
-              if ((defined $dir) and ($WML_SRC_DIRNAME =~/$dir/) or ($WML_SRC_BASENAME eq $base)) {
68
-                $class = 'class="active"';
69
-              } else {
70
-                $class = '';
71
-              }
72
-
73
-	            $dir = '.' unless defined $dir;
74
-
75
-              # translated version
76
-              if (-e "$(DOCROOT)/$dir/$lang/$base.wml") {
77
-                  printf '<li><a '.$class.' href="%s">%s</a></li>'."\n",
78
-                         stripDotSlashs("$(DOCROOT)/$dir/$base.html.$(LANG)"),$navigation{$key};
79
-              }
80
-              # english version
81
-              elsif (-e "$(DOCROOT)/$dir/en/$base.wml") {
82
-              	printf '<li><a '.$class.' href="%s">%s</a></li>'."\n",
83
-                  stripDotSlashs("$(DOCROOT)/$dir/$base.html"), $navigation{$key};
84
-              }
85
-              # full url
86
-              elsif ($key =~/^http/) {
87
-                printf '<li><a href="%s">%s</a></li>'."\n", $key, $navigation{$key};
88
-              } else {
89
-                warn "$WML_SRC_FILENAME has a [page $key] (parses to
90
-docdir: $(DOCROOT)/; dir: $dir; base: $base -> $(DOCROOT)/$dir/$lang/$base.wml), but that doesn't exist.";
91
-              }
92
-            }
93
-        }:>
94
-        </ul>
95
-      </div>
96
-      <!-- END NAV -->
97
-     # end navigation generation
98
-      <div id="calltoaction">
99
-        <ul>
100
-          <:{
101
-            my %calltoaction;
102
-            my @keys;
103
-            while (@calltoaction) {
104
-              my $key = shift @calltoaction;
105
-              my $val = shift @calltoaction;
106
-              push @keys, $key;
107
-              $calltoaction{$key} = $val;
108
-            }
109
-
110
-            my $page = $WML_SRC_BASENAME;
111
-            my $lang = "$(LANG)";
112
-            for my $key (@keys) {
113
-              my ($dir, $base) = $key =~ m,^(?:(.*)/)?(.*?)$,;
114
-
115
-              # in directory, set active
116
-              my $class;
117
-              if ((defined $dir) and ($WML_SRC_DIRNAME =~/$dir/) or ($WML_SRC_BASENAME eq $base)) {
118
-              #if ($WML_SRC_BASENAME eq $base) {
119
-                $class = 'class="active"';
120
-              } else {
121
-                $class = '';
122
-              }
123
-
124
-	          $dir = '.' unless defined $dir;
125
-              # try to use a translated version
126
-              if (-e "$(DOCROOT)/$dir/$lang/$base.wml") {
127
-                  printf '<li class="donate"><a '.$class.' href="%s">%s</a></li>'."\n",
128
-                         stripDotSlashs("$(DOCROOT)/$dir/$base.html.$(LANG)"),$calltoaction{$key};
129
-              }
130
-              # default to english version
131
-              elsif (-e "$(DOCROOT)/$dir/en/$base.wml") {
132
-              	printf '<li class="donate"><a '.$class.' href="%s">%s</a></li>'."\n",
133
-                  stripDotSlashs("$(DOCROOT)/$dir/$base.html"), $calltoaction{$key};
134
-              } else {
135
-                warn "$WML_SRC_FILENAME has a [page $key] (parses to docdir: $(DOCROOT)/; dir: $dir; base: $base -> $(DOCROOT)/$dir/$lang/$base.wml), but that doesn't exist.";
136
-              }
137
-            }
138
-          }:>
139
-        </ul>
140
-      </div>
141
-      <!-- END CALLTOACTION -->
142
-  </div>
143
-  <!-- END HEADER -->
144
-
145
-#<ifneq "$(REDIRECT)" "" "Redirecting to <a href="$(DOCROOT)/$(REDIRECT)">$(DOCROOT)/$(REDIRECT)</a>.">
146
-#<ifneq "$(REDIRECT_GLOBAL)" "" "Redirecting to <a href="$(REDIRECT_GLOBAL)">$(REDIRECT_GLOBAL)</a>.">
Browse code

Minify JS and CSS

hiromipaw authored on 03/07/2017 09:05:56
Showing 1 changed files
... ...
@@ -16,17 +16,17 @@
16 16
 
17 17
   # begin WML to generate css/js paths
18 18
   <ifneq "$(STYLESHEET)" "" "<link rel="stylesheet" type="text/css" href="$(DOCROOT)/$(STYLESHEET)">">
19
-  <ifeq "$(STYLESHEET)" "" "<link rel="stylesheet" type="text/css" href="$(DOCROOT)/css/master.css">">
19
+  <ifeq "$(STYLESHEET)" "" "<link rel="stylesheet" type="text/css" href="$(DOCROOT)/css/master.min.css">">
20 20
 
21
-  <link href="$(DOCROOT)/css/thankyou.css" rel="stylesheet" type="text/css">
21
+  <link href="$(DOCROOT)/css/thankyou.min.css" rel="stylesheet" type="text/css">
22 22
   <!--[if lte IE 8]>
23
-  <link rel="stylesheet" type="text/css" href="$(DOCROOT)/css/ie8-and-down.css">
23
+  <link rel="stylesheet" type="text/css" href="$(DOCROOT)/css/ie8-and-down.min.css">
24 24
   <![endif]-->
25 25
   <!--[if lte IE 7]>
26
-  <link rel="stylesheet" type="text/css" href="$(DOCROOT)/css/ie7-and-down.css">
26
+  <link rel="stylesheet" type="text/css" href="$(DOCROOT)/css/ie7-and-down.min.css">
27 27
   <![endif]-->
28 28
   <!--[if IE 6]>
29
-  <link rel="stylesheet" type="text/css" href="$(DOCROOT)/css/ie6.css">
29
+  <link rel="stylesheet" type="text/css" href="$(DOCROOT)/css/ie6.min.css">
30 30
   <![endif]-->
31 31
 #  <script language="javascript" type="text/javascript" src="$(DOCROOT)/global.js"></script>
32 32
   # end WML to generate css/js paths
... ...
@@ -36,7 +36,7 @@
36 36
   <meta name="keywords" content="anonymity online, tor, tor project, censorship circumvention, traffic analysis, anonymous communications research">
37 37
 <script type="text/javascript" src="$(DOCROOT)/js/jquery.min.js" charset="utf-8"></script>
38 38
 <script type="text/javascript" src="$(DOCROOT)/js/jquery.infieldlabel.min.js" charset="utf-8"></script>
39
-<script type="text/javascript" src="$(DOCROOT)/js/functions.js" charset="utf-8"></script>
39
+<script type="text/javascript" src="$(DOCROOT)/js/functions.min.js" charset="utf-8"></script>
40 40
 </head>
41 41
 <body>
42 42
 <div id="wrap">
Browse code

Move scripts to their own js file

hiromipaw authored on 16/06/2017 11:16:38
Showing 1 changed files
... ...
@@ -14,7 +14,7 @@
14 14
   <ifneq "$(REDIRECT)" "" "<meta http-equiv="refresh" content="0;url=$(DOCROOT)/$(REDIRECT)">">
15 15
   <ifneq "$(REDIRECT_GLOBAL)" "" "<meta http-equiv="refresh" content="0;url=$(REDIRECT_GLOBAL)">">
16 16
 
17
-  # begin WML to generate css/js paths 
17
+  # begin WML to generate css/js paths
18 18
   <ifneq "$(STYLESHEET)" "" "<link rel="stylesheet" type="text/css" href="$(DOCROOT)/$(STYLESHEET)">">
19 19
   <ifeq "$(STYLESHEET)" "" "<link rel="stylesheet" type="text/css" href="$(DOCROOT)/css/master.css">">
20 20
 
... ...
@@ -29,17 +29,14 @@
29 29
   <link rel="stylesheet" type="text/css" href="$(DOCROOT)/css/ie6.css">
30 30
   <![endif]-->
31 31
 #  <script language="javascript" type="text/javascript" src="$(DOCROOT)/global.js"></script>
32
-  # end WML to generate css/js paths 
32
+  # end WML to generate css/js paths
33 33
 
34 34
   <meta http-equiv="Content-Type" content="text/html; charset=UTF-8">
35 35
   <meta name="author" content="The Tor Project, Inc.">
36 36
   <meta name="keywords" content="anonymity online, tor, tor project, censorship circumvention, traffic analysis, anonymous communications research">
37 37
 <script type="text/javascript" src="$(DOCROOT)/js/jquery.min.js" charset="utf-8"></script>
38 38
 <script type="text/javascript" src="$(DOCROOT)/js/jquery.infieldlabel.min.js" charset="utf-8"></script>
39
-<script type="text/javascript" charset="utf-8">
40
-/* email placeholder function */
41
-	$(function(){ $("label").replaceWith('<label class="active" for="email">Enter your email address</label>'); $("label").inFieldLabels(); });
42
-</script>
39
+<script type="text/javascript" src="$(DOCROOT)/js/functions.js" charset="utf-8"></script>
43 40
 </head>
44 41
 <body>
45 42
 <div id="wrap">
... ...
@@ -63,9 +60,9 @@
63 60
             my $lang = "$(LANG)";
64 61
 
65 62
             for my $key (@keys) {
66
-              my ($dir, $base) = $key =~ m,^(?:(.*)/)?(.*?)$,;  
63
+              my ($dir, $base) = $key =~ m,^(?:(.*)/)?(.*?)$,;
67 64
 
68
-              # in directory of active link, set class active 
65
+              # in directory of active link, set class active
69 66
               my $class;
70 67
               if ((defined $dir) and ($WML_SRC_DIRNAME =~/$dir/) or ($WML_SRC_BASENAME eq $base)) {
71 68
                 $class = 'class="active"';
... ...
@@ -74,12 +71,12 @@
74 71
               }
75 72
 
76 73
 	            $dir = '.' unless defined $dir;
77
-                
74
+
78 75
               # translated version
79 76
               if (-e "$(DOCROOT)/$dir/$lang/$base.wml") {
80 77
                   printf '<li><a '.$class.' href="%s">%s</a></li>'."\n",
81 78
                          stripDotSlashs("$(DOCROOT)/$dir/$base.html.$(LANG)"),$navigation{$key};
82
-              } 
79
+              }
83 80
               # english version
84 81
               elsif (-e "$(DOCROOT)/$dir/en/$base.wml") {
85 82
               	printf '<li><a '.$class.' href="%s">%s</a></li>'."\n",
... ...
@@ -108,14 +105,14 @@ docdir: $(DOCROOT)/; dir: $dir; base: $base -> $(DOCROOT)/$dir/$lang/$base.wml),
108 105
               my $val = shift @calltoaction;
109 106
               push @keys, $key;
110 107
               $calltoaction{$key} = $val;
111
-            } 
108
+            }
112 109
 
113 110
             my $page = $WML_SRC_BASENAME;
114 111
             my $lang = "$(LANG)";
115 112
             for my $key (@keys) {
116
-              my ($dir, $base) = $key =~ m,^(?:(.*)/)?(.*?)$,;  
113
+              my ($dir, $base) = $key =~ m,^(?:(.*)/)?(.*?)$,;
117 114
 
118
-              # in directory, set active 
115
+              # in directory, set active
119 116
               my $class;
120 117
               if ((defined $dir) and ($WML_SRC_DIRNAME =~/$dir/) or ($WML_SRC_BASENAME eq $base)) {
121 118
               #if ($WML_SRC_BASENAME eq $base) {
... ...
@@ -129,7 +126,7 @@ docdir: $(DOCROOT)/; dir: $dir; base: $base -> $(DOCROOT)/$dir/$lang/$base.wml),
129 126
               if (-e "$(DOCROOT)/$dir/$lang/$base.wml") {
130 127
                   printf '<li class="donate"><a '.$class.' href="%s">%s</a></li>'."\n",
131 128
                          stripDotSlashs("$(DOCROOT)/$dir/$base.html.$(LANG)"),$calltoaction{$key};
132
-              } 
129
+              }
133 130
               # default to english version
134 131
               elsif (-e "$(DOCROOT)/$dir/en/$base.wml") {
135 132
               	printf '<li class="donate"><a '.$class.' href="%s">%s</a></li>'."\n",
... ...
@@ -137,7 +134,7 @@ docdir: $(DOCROOT)/; dir: $dir; base: $base -> $(DOCROOT)/$dir/$lang/$base.wml),
137 134
               } else {
138 135
                 warn "$WML_SRC_FILENAME has a [page $key] (parses to docdir: $(DOCROOT)/; dir: $dir; base: $base -> $(DOCROOT)/$dir/$lang/$base.wml), but that doesn't exist.";
139 136
               }
140
-            }    
137
+            }
141 138
           }:>
142 139
         </ul>
143 140
       </div>
Browse code

Remove the ANNOUNCE_RSS hack as per ticket 4951

Sebastian Hahn authored on 25/01/2012 00:54:07
Showing 1 changed files
... ...
@@ -13,8 +13,6 @@
13 13
   <link rel="shortcut icon" type="image/x-icon" href="$(IMGROOT)/favicon.ico">
14 14
   <ifneq "$(REDIRECT)" "" "<meta http-equiv="refresh" content="0;url=$(DOCROOT)/$(REDIRECT)">">
15 15
   <ifneq "$(REDIRECT_GLOBAL)" "" "<meta http-equiv="refresh" content="0;url=$(REDIRECT_GLOBAL)">">
16
-  <ifeq "$(ANNOUNCE_RSS)" "yes" "<link rel="alternate" title="Tor Project OR-announce" href="http://rss.gmane.org/gmane.network.onion-routing.announce"
17
-type="application/rss+xml">">
18 16
 
19 17
   # begin WML to generate css/js paths 
20 18
   <ifneq "$(STYLESHEET)" "" "<link rel="stylesheet" type="text/css" href="$(DOCROOT)/$(STYLESHEET)">">
Browse code

mv the wmi file into include

all wmi files are supposed to be in include, not hidden in an english
directory somewhere

Roger Dingledine authored on 21/09/2011 23:57:25
Showing 1 changed files
1 1
new file mode 100644
... ...
@@ -0,0 +1,151 @@
1
+#! /usr/bin/wml
2
+<: use strict; :>
3
+<: use warnings; :>
4
+#use "perl-globals.wmi"
5
+#use "links.wmi"
6
+#use "versions.wmi"
7
+#use "navigation.wmi"
8
+
9
+<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
10
+<html>
11
+<head>
12
+  <title>$(TITLE)</title>
13
+  <link rel="shortcut icon" type="image/x-icon" href="$(IMGROOT)/favicon.ico">
14
+  <ifneq "$(REDIRECT)" "" "<meta http-equiv="refresh" content="0;url=$(DOCROOT)/$(REDIRECT)">">
15
+  <ifneq "$(REDIRECT_GLOBAL)" "" "<meta http-equiv="refresh" content="0;url=$(REDIRECT_GLOBAL)">">
16
+  <ifeq "$(ANNOUNCE_RSS)" "yes" "<link rel="alternate" title="Tor Project OR-announce" href="http://rss.gmane.org/gmane.network.onion-routing.announce"
17
+type="application/rss+xml">">
18
+
19
+  # begin WML to generate css/js paths 
20
+  <ifneq "$(STYLESHEET)" "" "<link rel="stylesheet" type="text/css" href="$(DOCROOT)/$(STYLESHEET)">">
21
+  <ifeq "$(STYLESHEET)" "" "<link rel="stylesheet" type="text/css" href="$(DOCROOT)/css/master.css">">
22
+
23
+  <link href="$(DOCROOT)/css/thankyou.css" rel="stylesheet" type="text/css">
24
+  <!--[if lte IE 8]>
25
+  <link rel="stylesheet" type="text/css" href="$(DOCROOT)/css/ie8-and-down.css">
26
+  <![endif]-->
27
+  <!--[if lte IE 7]>
28
+  <link rel="stylesheet" type="text/css" href="$(DOCROOT)/css/ie7-and-down.css">
29
+  <![endif]-->
30
+  <!--[if IE 6]>
31
+  <link rel="stylesheet" type="text/css" href="$(DOCROOT)/css/ie6.css">
32
+  <![endif]-->
33
+#  <script language="javascript" type="text/javascript" src="$(DOCROOT)/global.js"></script>
34
+  # end WML to generate css/js paths 
35
+
36
+  <meta http-equiv="Content-Type" content="text/html; charset=UTF-8">
37
+  <meta name="author" content="The Tor Project, Inc.">
38
+  <meta name="keywords" content="anonymity online, tor, tor project, censorship circumvention, traffic analysis, anonymous communications research">
39
+<script type="text/javascript" src="$(DOCROOT)/js/jquery.min.js" charset="utf-8"></script>
40
+<script type="text/javascript" src="$(DOCROOT)/js/jquery.infieldlabel.min.js" charset="utf-8"></script>
41
+<script type="text/javascript" charset="utf-8">
42
+/* email placeholder function */
43
+	$(function(){ $("label").replaceWith('<label class="active" for="email">Enter your email address</label>'); $("label").inFieldLabels(); });
44
+</script>
45
+</head>
46
+<body>
47
+<div id="wrap">
48
+  <div id="header">
49
+    <h1 id="logo"><a href="<page index>">Tor</a></h1>
50
+      # navigation menu generation
51
+      <div id="nav">
52
+        <ul>
53
+        <:{
54
+            # create a hash and maintain order of keys
55
+            my %navigation;
56
+            my @keys;
57
+            while (@navigation) {
58
+              my $key = shift @navigation;
59
+              my $val = shift @navigation;
60
+              push @keys, $key;
61
+              $navigation{$key} = $val;
62
+            }
63
+
64
+            my $page = $WML_SRC_BASENAME;
65
+            my $lang = "$(LANG)";
66
+
67
+            for my $key (@keys) {
68
+              my ($dir, $base) = $key =~ m,^(?:(.*)/)?(.*?)$,;  
69
+
70
+              # in directory of active link, set class active 
71
+              my $class;
72
+              if ((defined $dir) and ($WML_SRC_DIRNAME =~/$dir/) or ($WML_SRC_BASENAME eq $base)) {
73
+                $class = 'class="active"';
74
+              } else {
75
+                $class = '';
76
+              }
77
+
78
+	            $dir = '.' unless defined $dir;
79
+                
80
+              # translated version
81
+              if (-e "$(DOCROOT)/$dir/$lang/$base.wml") {
82
+                  printf '<li><a '.$class.' href="%s">%s</a></li>'."\n",
83
+                         stripDotSlashs("$(DOCROOT)/$dir/$base.html.$(LANG)"),$navigation{$key};
84
+              } 
85
+              # english version
86
+              elsif (-e "$(DOCROOT)/$dir/en/$base.wml") {
87
+              	printf '<li><a '.$class.' href="%s">%s</a></li>'."\n",
88
+                  stripDotSlashs("$(DOCROOT)/$dir/$base.html"), $navigation{$key};
89
+              }
90
+              # full url
91
+              elsif ($key =~/^http/) {
92
+                printf '<li><a href="%s">%s</a></li>'."\n", $key, $navigation{$key};
93
+              } else {
94
+                warn "$WML_SRC_FILENAME has a [page $key] (parses to
95
+docdir: $(DOCROOT)/; dir: $dir; base: $base -> $(DOCROOT)/$dir/$lang/$base.wml), but that doesn't exist.";
96
+              }
97
+            }
98
+        }:>
99
+        </ul>
100
+      </div>
101
+      <!-- END NAV -->
102
+     # end navigation generation
103
+      <div id="calltoaction">
104
+        <ul>
105
+          <:{
106
+            my %calltoaction;
107
+            my @keys;
108
+            while (@calltoaction) {
109
+              my $key = shift @calltoaction;
110
+              my $val = shift @calltoaction;
111
+              push @keys, $key;
112
+              $calltoaction{$key} = $val;
113
+            } 
114
+
115
+            my $page = $WML_SRC_BASENAME;
116
+            my $lang = "$(LANG)";
117
+            for my $key (@keys) {
118
+              my ($dir, $base) = $key =~ m,^(?:(.*)/)?(.*?)$,;  
119
+
120
+              # in directory, set active 
121
+              my $class;
122
+              if ((defined $dir) and ($WML_SRC_DIRNAME =~/$dir/) or ($WML_SRC_BASENAME eq $base)) {
123
+              #if ($WML_SRC_BASENAME eq $base) {
124
+                $class = 'class="active"';
125
+              } else {
126
+                $class = '';
127
+              }
128
+
129
+	          $dir = '.' unless defined $dir;
130
+              # try to use a translated version
131
+              if (-e "$(DOCROOT)/$dir/$lang/$base.wml") {
132
+                  printf '<li class="donate"><a '.$class.' href="%s">%s</a></li>'."\n",
133
+                         stripDotSlashs("$(DOCROOT)/$dir/$base.html.$(LANG)"),$calltoaction{$key};
134
+              } 
135
+              # default to english version
136
+              elsif (-e "$(DOCROOT)/$dir/en/$base.wml") {
137
+              	printf '<li class="donate"><a '.$class.' href="%s">%s</a></li>'."\n",
138
+                  stripDotSlashs("$(DOCROOT)/$dir/$base.html"), $calltoaction{$key};
139
+              } else {
140
+                warn "$WML_SRC_FILENAME has a [page $key] (parses to docdir: $(DOCROOT)/; dir: $dir; base: $base -> $(DOCROOT)/$dir/$lang/$base.wml), but that doesn't exist.";
141
+              }
142
+            }    
143
+          }:>
144
+        </ul>
145
+      </div>
146
+      <!-- END CALLTOACTION -->
147
+  </div>
148
+  <!-- END HEADER -->
149
+
150
+#<ifneq "$(REDIRECT)" "" "Redirecting to <a href="$(DOCROOT)/$(REDIRECT)">$(DOCROOT)/$(REDIRECT)</a>.">
151
+#<ifneq "$(REDIRECT_GLOBAL)" "" "Redirecting to <a href="$(REDIRECT_GLOBAL)">$(REDIRECT_GLOBAL)</a>.">