;ELC   
;;; compiled by kwzh@hal.gnu.ai.mit.edu on Fri Aug 26 23:32:27 1994
;;; from file /gd/gnu/emacs/19.0/lisp/rot13.el
;;; emacs version 19.25.94.8.
;;; bytecomp version FSF 2.10
;;; optimization is on.
;;; this file uses opcodes which do not exist in Emacs 18.

(if (and (boundp 'emacs-version)
	 (or (and (boundp 'epoch::version) epoch::version)
	     (string-lessp emacs-version "19")))
    (error "`/gd/gnu/emacs/19.0/lisp/rot13.el' was compiled for Emacs 19"))

(defvar rot13-display-table (byte-code "À Á\nÄWƒ0 \nÅ\\Æ\nÇ\\Ä¦Å\\!Iˆ\nÈ\\Æ\nÇ\\Ä¦È\\!Iˆ\nT‰‚ *‡" [make-display-table 0 i table 26 97 vector 13 65] 6) "\
Char table for rot 13 display.")
(defalias 'rot13-other-window #[nil "ÀpÁ\"Ã\n\f\")‡" [display-buffer t w set-window-display-table rot13-display-table] 3 "\
Display current buffer in rot 13 in another window.
To terminate the rot13 display, delete that window." nil])
(defalias 'toggle-rot13-mode #[nil "ÀÁ !\n=ƒ ÃÁ Ä\"‡ÀÁ !?… ÃÁ \n\"‡" [window-display-table selected-window rot13-display-table set-window-display-table nil] 3 "\
Toggle the use of rot 13 encoding for the current window." nil])
(provide (quote rot13))