Mercurial > emacs

comparison lisp/emulation/vip.el @ 258:1e0bc00dca7a

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
*** empty log message ***
author Jim Blandy <jimb@redhat.com>
date Thu, 09 May 1991 21:50:55 +0000
parents 5d42bce31792
children 9c89fd7ddd41
comparison
equal deleted inserted replaced
257:e5ba2ba35226 258:1e0bc00dca7a
212 (setq mode-line-buffer-identification 212 (setq mode-line-buffer-identification
213 (if (string= string "Emacs:") 213 (if (string= string "Emacs:")
214 vip-emacs-mode-line-buffer-identification 214 vip-emacs-mode-line-buffer-identification
215 (list (concat string " %17b"))))) 215 (list (concat string " %17b")))))
216 216
217 ;;;###autoload
217 (defun vip-mode () 218 (defun vip-mode ()
218 "Turn on VIP emulation of VI." 219 "Turn on VIP emulation of VI."
219 (interactive) 220 (interactive)
220 (if (not vip-inhibit-startup-message) 221 (if (not vip-inhibit-startup-message)
221 (progn 222 (progn