Committing revised cleanplot with functions