Mercurial > emacs
diff lisp/gs.el @ 105648:c97e346c34f6
(gs-load-image): Replace obsolete forms of sit-for, sleep-for.
author | Glenn Morris <rgm@gnu.org> |
---|---|
date | Sat, 17 Oct 2009 03:15:13 +0000 |
parents | d500b86d2189 |
children | 1d1d5d9bd884 |
line wrap: on
line diff
--- a/lisp/gs.el Sat Oct 17 03:13:51 2009 +0000 +++ b/lisp/gs.el Sat Oct 17 03:15:13 2009 +0000 @@ -1,7 +1,7 @@ ;;; gs.el --- interface to Ghostscript -;; Copyright (C) 1998, 2001, 2002, 2003, 2004, 2005, 2006, 2007, -;; 2008, 2009 Free Software Foundation, Inc. +;; Copyright (C) 1998, 2001, 2002, 2003, 2004, 2005, 2006, 2007, 2008, +;; 2009 Free Software Foundation, Inc. ;; Maintainer: FSF ;; Keywords: internal @@ -180,8 +180,8 @@ ;; out even more sluggish. ;; (get-buffer-process "*GS*") (not (zerop timeout))) - (unless (sit-for 0 100 t) - (sleep-for 0 50)) + (unless (sit-for 0.1 t) + (sleep-for 0.05)) (setq timeout (1- timeout))) ;; No use waiting longer. We might want to try killing off