X-Git-Url: http://www.average.org/gitweb/?p=mkgallery.git;a=blobdiff_plain;f=include%2Fchrome.pm;fp=include%2Fchrome.pm;h=0000000000000000000000000000000000000000;hp=e27fb5b7d25c74580bb4f133e2aaa9e056a665bc;hb=14f59b5697b711f20cdcaf459a36ad103531565c;hpb=3364d219ce6156f74854698a7ecda95c6d45c00d

diff --git a/include/chrome.pm b/include/chrome.pm
deleted file mode 100644
index e27fb5b..0000000
--- a/include/chrome.pm
+++ /dev/null
@@ -1,52 +0,0 @@
-#!/usr/bin/perl
-# $Id$
-#
-# customizable class to generate html around the gallery index
-
-package Chrome;
-
-use strict;
-
-# Boilerplate. Do not change this (unless you know better).
-
-sub new {
-	my $this=shift;
-	my $self;
-	my $parm=shift;
-	if (ref($this)) {
-		die "$this::new should not be called as instance method";
-	} else {
-		$self={
-			-title		=> $parm->{-title},
-			-depth		=> $parm->{-depth},
-			-breadcrumbs	=> $parm->{-breadcrumbs},
-		};
-	}
-	bless $self,$this;
-	return $self;
-}
-
-# Public methods. Replace this with what suits you.
-
-sub header {
-	my $self=shift;
-	return $self{-depth}?
-		"<div class=\"uplink\"><a href=\"../index.html\">UP</a></div>":
-		"".
-		"<h1 class=\"title\">$self{-title}</h1>";
-}
-
-sub axheader {
-	my $self=shift;
-	return "<h2 class=\"alisthdr\">Albums</h2>";
-}
-
-sub ixheader {
-	my $self=shift;
-	return "<h2 class=\"ilisthdr\">Images</h2>";
-}
-
-sub footer {
-	my $self=shift;
-	return "<hr class=\"footer\" />";
-}