unwind-protect not cleaning up?

[Jambunathan K]

The snippet below is taken from (info "(elisp) Cleanups") with minor
modifications.  Put it in a scratch buffer and C-x C-e it.  Once it is
done, I am able to C-x b to YOU CANNOT KILL ME.

(let ((buffer (get-buffer-create "YOU CANNOT KILL ME")))
  (with-current-buffer buffer
    (unwind-protect
        (/ 1 0)
      (kill-buffer buffer))))

Comments...


In GNU Emacs 24.1.1 (i386-mingw-nt5.1.2600)
 of 2012-06-02 on MARVIN
Windowing system distributor `Microsoft Corp.', version 5.1.2600
Configured using:
 `configure --with-gcc (4.6) --no-opt --enable-checking --cflags
 -ID:/devel/emacs/libs/libXpm-3.5.8/include
 -ID:/devel/emacs/libs/libXpm-3.5.8/src
 -ID:/devel/emacs/libs/libpng-dev_1.4.3-1/include
 -ID:/devel/emacs/libs/zlib-dev_1.2.5-2/include
 -ID:/devel/emacs/libs/giflib-4.1.4-1/include
 -ID:/devel/emacs/libs/jpeg-6b-4/include
 -ID:/devel/emacs/libs/tiff-3.8.2-1/include
 -ID:/devel/emacs/libs/gnutls-3.0.9/include'

Important settings:
  value of $LC_ALL: nil
  value of $LC_COLLATE: nil
  value of $LC_CTYPE: nil
  value of $LC_MESSAGES: nil
  value of $LC_MONETARY: nil
  value of $LC_NUMERIC: nil
  value of $LC_TIME: nil
  value of $LANG: ENG
  value of $XMODIFIERS: nil
  locale-coding-system: cp1252
  default enable-multibyte-characters: t


--