Add create-scratch-buffer function.