Update server.R

delete everything to make the merging easier