Adds new fonts from specified directory

addNewFonts.ps1

# "Automatically" adds font but for some reason it still needs user interaction when the file already exists
function addNewFonts{
    Param(
        [Parameter(Mandatory=$true)]
        [string]$dir
    )

    if($dir[-1] -ne [IO.Path]::DirectorySeparatorChar){$dir = $dir + [IO.Path]::DirectorySeparatorChar}
    $fonts = (New-Object -ComObject Shell.Application).Namespace(0x14)
    Get-ChildItem -Path ($dir + '*') -Include @('*.ttf','*.otf') | % { $fonts.CopyHere($_.fullname, 16) }
}

addNewFonts -dir 'D:\fonts'