procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Comments censored.

Browse source
This commit is contained in:
Karl Heuer 1996-02-21 21:39:11 +00:00
parent dbd1c9ab59
commit 8545ff2f55
3 changed files with 33 additions and 4 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

11
lisp/emacs-lisp/byte-opt.el
View file

@ -25,6 +25,15 @@
;;; Commentary:
;;; This file has been censored by the Communications Decency Act.
;;; That law was passed under the guise of a ban on pornography, but
;;; it bans far more than that. This file did not contain pornography,
;;; but it was censored nonetheless.
;;; For information on US government censorship of the Internet, and
;;; what you can do to bring back freedom of the press, see the web
;;; site http://www.vtw.org/
;; ========================================================================
;; "No matter how hard you try, you can't make a racehorse out of a pig.
;; You can, however, make a faster pig."
@ -1285,7 +1294,7 @@
byte-member byte-assq byte-quo byte-rem)
byte-compile-side-effect-and-error-free-ops))
;;; This piece of shit is because of the way DEFVAR_BOOL() variables work.
;;; This crock is because of the way DEFVAR_BOOL variables work.
;;; Consider the code
;;;
;;; (defun foo (flag)

13
lisp/mail/mail-extr.el
View file

@ -26,6 +26,15 @@
;;; Commentary:
;;; This file has been censored by the Communications Decency Act.
;;; That law was passed under the guise of a ban on pornography, but
;;; it bans far more than that. This file did not contain pornography,
;;; but it was censored nonetheless.
;;; For information on US government censorship of the Internet, and
;;; what you can do to bring back freedom of the press, see the web
;;; site http://www.vtw.org/
;; The entry point of this code is
;;
;; mail-extract-address-components: (address)
@ -1308,9 +1317,9 @@ If ADDRESS contains more than one RFC-822 address, only the first is
(cond
;; Handle X.400 addresses encoded in RFC-822.
;; *** Shit! This has to handle the case where it is
;; *** This has to handle the case where it is
;; *** embedded in a quote too!
;; *** Shit! The input is being broken up into atoms
;; *** The input is being broken up into atoms
;; *** by periods!
((looking-at mail-extr-x400-encoded-address-pattern)

13
lisp/terminal.el
View file

@ -23,6 +23,17 @@
;; Free Software Foundation, Inc., 59 Temple Place - Suite 330,
;; Boston, MA 02111-1307, USA.
;;; Commentary:
;;; This file has been censored by the Communications Decency Act.
;;; That law was passed under the guise of a ban on pornography, but
;;; it bans far more than that. This file did not contain pornography,
;;; but it was censored nonetheless.
;;; For information on US government censorship of the Internet, and
;;; what you can do to bring back freedom of the press, see the web
;;; site http://www.vtw.org/
;;; Code:
;;>>TODO
@ -798,7 +809,7 @@ move to start of new line, clear to end of line."
;; disgusting unix-required shit
;; disgusting unix-required excrement
;; Are we living twenty years in the past yet?
(defun te-losing-unix ()