In the system resource file MiscStrings.tr there is a template:
@@resource PackageTemplate
Notebook[{
Cell[BoxData[
RowBox[{"BeginPackage", "[", "\"\<\[Placeholder]`\>\"", "]"}]], "Code"],
Cell[BoxData[
RowBox[{"Begin", "[", "\"\<`Private`\>\"", "]"}]], "Code"],
Cell[BoxData[
RowBox[{"End", "[", "]"}]], "Code"],
Cell[BoxData[
RowBox[{"EndPackage", "[", "]"}]], "Code"]
}]
I suppose there is also an automatic way to insert or use this template. What is it?


