Re: Seeking Advice about refactoring and advice snippet

[Stefan Monnier]

> How would you refactor that snippet to apply the dry principle?

Here's how I'd refactor it:

    (with-current-buffer (get-buffer "*scratch*")
      (add-hook 'kill-buffer-hook
                (lambda () (error "DENIED! don't kill my precious *scratch*!!"))
                nil t))

;-)


        Stefan


PS: Along the same lines: kill-this-buffer calls kill-buffer, so you
shouldn't need to advise kill-this-buffer.