;ELC   
;;; Compiled by leavens@larch.cs.iastate.edu on Mon Mar 18 22:01:33 2002
;;; from file /home/bambam/leavens/emacs/my-commands.el
;;; in Emacs version 20.7.1
;;; with bytecomp version 2.56
;;; with all optimizations.

;;; This file uses dynamic docstrings, first added in Emacs 19.29.
(if (and (boundp 'emacs-version)
	 (< (aref emacs-version (1- (length emacs-version))) ?A)
	 (or (and (boundp 'epoch::version) epoch::version)
	     (string-lessp emacs-version "19.29")))
    (error "`my-commands.el' was compiled for Emacs 19.29 or later"))

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;


#@74 Take out all C-m (^M) characters in a file from point to the end of file
(defalias 'anti-dos #[nil "\300\301\302\"\207" [replace-string "" ""] 3 (#$ . 620) "*"])
#@81 Add C-m (^M) characters before the C-j characters from point to the end of file
(defalias 'pro-dos #[nil "\300\301\302\"\207" [replace-string "\n" "\n"] 3 (#$ . 789) "*"])
#@76 makes C-h do the job of delete (delete still works), puts help on C-x C-h.
(defalias 'delete-on-backspace #[nil "\300\301\302\"\210\300\303\304\"\207" [global-set-key "" backward-delete-char-untabify "\277" help-command] 3 (#$ . 968) nil])
(fset 'sanitize-review "* COMMENTS FOR PC ONLY* COMMENTS FOR AUTHORS(syk")