Update auth.R

add PDF type