Mercurial > emacs
changeset 14641:4706508583bd
Comments censored.
| author | Karl Heuer <kwzh@gnu.org> |
|---|---|
| date | Wed, 21 Feb 1996 21:39:11 +0000 |
| parents | 65151464291f |
| children | 01e8fdb45deb |
| files | lisp/emacs-lisp/byte-opt.el lisp/mail/mail-extr.el lisp/terminal.el |
| diffstat | 3 files changed, 33 insertions(+), 4 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/emacs-lisp/byte-opt.el Wed Feb 21 21:35:28 1996 +0000 +++ b/lisp/emacs-lisp/byte-opt.el Wed Feb 21 21:39:11 1996 +0000 @@ -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)
--- a/lisp/mail/mail-extr.el Wed Feb 21 21:35:28 1996 +0000 +++ b/lisp/mail/mail-extr.el Wed Feb 21 21:39:11 1996 +0000 @@ -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 @@ (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)
--- a/lisp/terminal.el Wed Feb 21 21:35:28 1996 +0000 +++ b/lisp/terminal.el Wed Feb 21 21:39:11 1996 +0000 @@ -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 @@ -;; disgusting unix-required shit +;; disgusting unix-required excrement ;; Are we living twenty years in the past yet? (defun te-losing-unix ()