X-Git-Url: https://git.hcoop.net/bpt/emacs.git/blobdiff_plain/fe6aa7a1f05e241a438ca3fa85969b7381d89a0e..026b174672c427b035009911de305992a94098d6:/src/image.c

diff --git a/src/image.c b/src/image.c
index a741815207..7fa28840c1 100644
--- a/src/image.c
+++ b/src/image.c
@@ -2263,7 +2263,7 @@ slurp_file (char *file, ptrdiff_t *size)
 
   if (fp)
     {
-      ptrdiff_t count = SPECPDL_INDEX ();
+      dynwind_begin ();
       record_unwind_protect_ptr (fclose_unwind, fp);
 
       if (fstat (fileno (fp), &st) == 0
@@ -2282,7 +2282,7 @@ slurp_file (char *file, ptrdiff_t *size)
 	    }
 	}
 
-      unbind_to (count, Qnil);
+      dynwind_end ();
     }
 
   return buf;