Delete All Characters After "." In Each Line

Various additional :normal solutions:

:%norm )Dx
:%norm $T.D
:%norm f.C.
:%norm 0/\. /e<C-v><CR>D

With substitutions:

:%s/\..*/./

With :normal command:

:%norm f.lD