]> code.delx.au - gnu-emacs/blobdiff - lisp/emacs-lock.el
* net/tramp.el (tramp-ssh-controlmaster-template): Make it a
[gnu-emacs] / lisp / emacs-lock.el
index 6d91238f2b1e188dd98669de0d956480070a5833..0b116ac9284903aed3b31af78f2261a037039604 100644 (file)
@@ -1,6 +1,6 @@
 ;;; emacs-lock.el --- protect buffers against killing or exiting -*- lexical-binding: t -*-
 
-;; Copyright (C) 2011-2012 Free Software Foundation, Inc.
+;; Copyright (C) 2011-2013 Free Software Foundation, Inc.
 
 ;; Author: Juanma Barranquero <lekktu@gmail.com>
 ;; Inspired by emacs-lock.el by Tom Wurgler <twurgler@goodyear.com>
@@ -86,7 +86,7 @@ for both actions (NOT RECOMMENDED)."
 The functions get one argument, the first locked buffer found."
   :type 'hook
   :group 'emacs-lock
-  :version "24.2")
+  :version "24.3")
 
 (defvar emacs-lock-mode nil
   "If non-nil, the current buffer is locked.
@@ -249,9 +249,9 @@ Other values are interpreted as usual."
 
 (defun toggle-emacs-lock ()
   "Toggle `emacs-lock-from-exiting' for the current buffer."
+  (declare (obsolete emacs-lock-mode "24.1"))
   (interactive)
   (call-interactively 'emacs-lock-mode))
-(make-obsolete 'toggle-emacs-lock 'emacs-lock-mode "24.1")
 
 (provide 'emacs-lock)