Album Assembly File

Pensieve Header: This notebook indexes my (public) Album.

Actions

Delete all index files

DeleteFile /@ FileNames["index.html", {PensieveDirectory}, Infinity]//Length

Assemble All

PensieveAssemble["all"];

Convert all .nb Files

PensieveAssemble["nb"]

Convert all .one Files

PensieveAssemble["one"];

Make thumbnails for all images

PensieveAssemble["thumbs"]

Create Index Pages

PensieveAssemble["indexes"]

PensieveAssemble Random, About, RecentChanges.

PensieveAssemble["random"]

Delete all TOC files

(* DeleteFile /@ FileNames["TOC.m", {PensieveDirectory}, Infinity]; *)

Delete all thumbnails

DeleteFile /@ Flatten[FileNames["*", #]& /@ (
FileNames["thumbs", {PensieveDirectory}, Infinity]
)];

Initialization

Get["C:\\drorbn\\AcademicPensieve\\Projects\\AcademicPensieve\\AssemblyPrograms.m"];
PensieveName = "Album";
PensieveDirectory="C:\\drorbn\\Album";
PensieveURL = "https://drorbn.net/Album";

Template Extraction

BeginPackage["Pensieve`"]; Begin["`Private`"];
InitializeTemplates[] := (
Clear[ExtractTemplate];
ExtractTemplate[tn_String] := ExtractTemplate[tn] = Import[
FileNameJoin[{
PensieveDirectory, "Admin",
tn<>".txt"
}]
];
);
InitializeTemplates[];
End[];EndPackage[]