;ELC   
;;; compiled by kwzh@hal.gnu.ai.mit.edu on Mon Apr 17 19:46:16 1995
;;; from file /gd/gnu/emacs/19.0/lisp/makesum.el
;;; emacs version 19.28.90.26.
;;; 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/makesum.el' was compiled for Emacs 19"))


#@116 Make a summary of current key bindings in the buffer *Summary*.
Previous contents of that buffer are killed first.
(defalias 'make-command-summary #[nil "АБ!€В‹€ГђЉ\fq€З €ИЙ!€eb€`Кy€`|€ЛМНО#ѓ0 ПР!€‚! eb€ЛСНО#ѓB ПТ!€‚3 eb€ЛУНО#ѓT ПФ!€‚E eb€ЛХНО#ѓf ПЦ!€‚W eb€ЛЧНО#ѓx ПШ!€‚i eb€ЩЪНО#ѓћ Ыu€ЬЭ±€ЛЮНО#ѓћ `Ыy€`|€‚Њ eb€Яа бвOг±€`дy€`|€Кy€m„Ф `%ЩжНО#„З db€з%`\"€Кy€)‚µ eb*‘€Аи!‡" [message "Making command summary..." ((describe-bindings)) "*Summary*" mode-name cur-mode standard-output erase-buffer insert-buffer-substring "*Help*" 1 search-forward "         " nil t replace-match "  " "-@ " "-SP" "  .. ~ " "SP .. ~" "C-?" "DEL" "C-i" "TAB" re-search-forward "^Local Bindings:" -1 " for " " Mode" "??\n" "Emacs command summary, " current-time-string 0 10 ".\n" 2 beg "^$" double-column "Making command summary...done"] 5 (#$ . 484) nil])
(defalias 'double-column #[(start end) "А‰‰‰‰d	ZИ		\"‰КX„j TЛҐ	b€Љy€WѓN T`ЉА€`){‰\fB`Кy€`|€‚+ )\fџ‰ѓj А€Мj€\f@c€Кy€\fA‰„V d\nZb.‡" [nil end from-end nlines lines line cnt half count-lines start 1 2 41] 8 nil "r"])