Mercurial > emacs
comparison lisp/emulation/vip.el @ 258:1e0bc00dca7a
*** 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 |