SetDirectory["C:\\drorbn\\AcademicPensieve\\2015-08\\LesDiablerets-1508"]

Make::usage = "Make[targets, sources, action] makes a target, or a list of targets, given sources, or a list of sources, in the style of the unix 'make' command.";
Make[target_String, sources_, action_Hold] := Make[Evaluate@{target}, sources, action];
Make[targets_, source_String, action__Hold] := Make[targets, Evaluate@{source}, action];
Make[targets_List, sources_List, action_Hold] := Module[{},
If[
(And @@ ((FileType[#] =!= None)& /@ sources)) &&
Or[
Or @@ ((FileType[#]===None)& /@ targets),
Min[AbsoluteTime[FileDate[#]]& /@ targets] < Max[AbsoluteTime[FileDate[#]]& /@ sources]
],
Print["Making ",targets, " ..."];
ReleaseHold[action]
]
];

?Make

Make["FreeLieDemo.pdf"] := ();

nb=Get["FreeLieDemo.nb"];
If[FreeQ[nb, PrintingOptions->_, Infinity], AppendTo[nb, PrintingOptions-> {}]];
nb = nb /. {
(PageHeaders-> _) -> (PageHeaders -> Table[{None,None,None},{2}]),
(PageFooters-> _) -> (PageFooters -> Table[{None,None, None},{2}]),
(PrintingOptions->popts_) :> (PrintingOptions->
Join[popts, {"EmbedStandardPostScriptFonts"->1, "PageSize"->1, "PaperSize"->1}]/. {
("EmbedStandardPostScriptFonts"->_) -> ("EmbedStandardPostScriptFonts"->False),
("PageSize" -> _) -> "PageSize" -> 72{4.25, 10.5},
("PaperSize" -> _) -> "PaperSize" -> 72{4.25, 4*10.5}
})
};
NotebookPrint[nb, "C:\\drorbn\\AcademicPensieve\\2015-08\\LesDiablerets-1508\\FreeLieDemo.pdf"];

{
"CleanTeX" -> True
}