Install KnotTheory` and WikiLink`

Scott's version

\(\(KATPath\  = \ "c:\scott\math.berkeley.edu\Work\Mathematica\KnotAtlas\";\)\)
AppendTo[$Path,  KATPath];
SetDirectory[KATPath];
<<  KnotTheory`
<< KnotTheoryExtra`
<< "WikiLink\\WikiLink.m"
SetJarPath[KATPath <> "WikiLink\\"];

\(CreateWikiConnection[
"http://katlas.math.toronto.edu/w/index.php", 
wikiUserName = 
        InputString["Enter Your Username:"], 
InputString["Enter Your Password"]
]\)

wikiUserName == WikiUserName[]

Files in Scott's responsibility

\(\(FileList = {"KnotAtlas maintenance/UploadingFiles.nb", "KnotAtlas maintenance/GeneratingKnotTables.nb", "KnotAtlas maintenance/UploadingImages.nb", "WikiLink.zip"};\)\)

WikiUploadFile[#, ""] & /@ FileList

SourceFileList = {"WikiLink/WikiLink.m"};