1.1 --- a/src/ChangeLog	Fri Jul 03 12:21:50 2009 +0200
     1.2 +++ b/src/ChangeLog	Fri Jul 03 18:59:07 2009 +0200
     1.3 @@ -1,3 +1,8 @@
     1.4 +2009-07-03  Jaroslav Hajek  <highegg@gmail.com>
     1.5 +
     1.6 +	* pt-eval.cc (do_unwind_protect_cleanup_code): Add missing
     1.7 +	unwind_protect::run.
     1.8 +
     1.9  2009-07-02  Jaroslav Hajek  <highegg@gmail.com>
    1.10  
    1.11  	* help.cc (do_which): Also look for files.

     2.1 --- a/src/pt-eval.cc	Fri Jul 03 12:21:50 2009 +0200
     2.2 +++ b/src/pt-eval.cc	Fri Jul 03 18:59:07 2009 +0200
     2.3 @@ -986,6 +986,8 @@
     2.4      unwind_protect::discard ();
     2.5    else
     2.6      unwind_protect::run ();
     2.7 +
     2.8 +  unwind_protect::run ();
     2.9  }
    2.10  
    2.11  void