equal
deleted
inserted
replaced
37 my $domain = "p.bauherren.ovh"; |
37 my $domain = "p.bauherren.ovh"; |
38 my $max_rss = 30; |
38 my $max_rss = 30; |
39 # The first page has one less article. Think of it as a feature. |
39 # The first page has one less article. Think of it as a feature. |
40 my $max_cat = 30; |
40 my $max_cat = 30; |
41 my $blog_title = "Pranshu's blog"; |
41 my $blog_title = "Pranshu's blog"; |
42 my ($home, $about) = ("home.html", "about.html"); |
42 my ($home, $about) = ("index.html", "about.html"); |
43 my $etc_files; |
43 my $etc_files; |
44 my $nav_id = "nav"; |
44 my $nav_id = "nav"; |
45 my $rdesc = "description"; |
45 my $rdesc = "description"; |
46 |
46 |
47 my $username = $ENV{LOGNAME} || $ENV{USER} || getpwuid ($<); |
47 my $username = $ENV{LOGNAME} || $ENV{USER} || getpwuid ($<); |
71 my $custom_code = "(list 1)"; |
71 my $custom_code = "(list 1)"; |
72 |
72 |
73 my $navbar = <<"END" =~ s/\n\s+//gr; |
73 my $navbar = <<"END" =~ s/\n\s+//gr; |
74 <ul> |
74 <ul> |
75 <li> <a href="LINK">Home</a> </li> |
75 <li> <a href="LINK">Home</a> </li> |
76 <li> <a href="LINK">Catagories</a> </li> |
76 <li> <a href="LINK">Posts</a> </li> |
77 <li> <a href="LINK">About</a> </li> |
77 <li> <a href="LINK">About</a> </li> |
78 </ul> |
78 </ul> |
79 END |
79 END |
80 |
80 |
81 my $elisp_code = <<"END" =~ s/\n\s+//gr; |
81 my $elisp_code = <<"END" =~ s/\n\s+//gr; |