Function: ex-quit

ex-quit is a byte-compiled function defined in vip.el.gz.

Signature

(ex-quit)

Documentation

ex quit

Source Code

;; Defined in /usr/src/emacs/lisp/obsolete/vip.el.gz
(defun ex-quit ()
  "ex quit"
  (let (char)
    (with-current-buffer " *ex-working-space*"
      (skip-chars-forward " \t")
      (setq char (following-char)))
    (if (= char ?!) (kill-emacs t) (save-buffers-kill-emacs))))