X-Git-Url: https://code.delx.au/gnu-emacs/blobdiff_plain/0877d0dc24ee792b9b14592869ea1aa0934aee58..96bd07a3226700156fa7d5ec20e9bd6550c95057:/lisp/rot13.el diff --git a/lisp/rot13.el b/lisp/rot13.el index 03beed3a85..ee4f51d7ff 100644 --- a/lisp/rot13.el +++ b/lisp/rot13.el @@ -1,9 +1,9 @@ ;;; rot13.el --- display a buffer in ROT13 -;; Copyright (C) 1988, 2001-2013 Free Software Foundation, Inc. +;; Copyright (C) 1988, 2001-2016 Free Software Foundation, Inc. ;; Author: Howard Gayle -;; Maintainer: FSF +;; Maintainer: emacs-devel@gnu.org ;; This file is part of GNU Emacs. @@ -101,9 +101,9 @@ See also `toggle-rot13-mode'." (defun toggle-rot13-mode () "Toggle the use of ROT13 encoding for the current window." (interactive) - (if (eq (window-display-table (selected-window)) rot13-display-table) + (if (eq (window-display-table) rot13-display-table) (set-window-display-table (selected-window) nil) - (if (null (window-display-table (selected-window))) + (if (null (window-display-table)) (set-window-display-table (selected-window) rot13-display-table)))) (provide 'rot13)