From mboxrd@z Thu Jan 1 00:00:00 1970 Path: news.gmane.org!not-for-mail From: "Lennart Borgman (gmail)" Newsgroups: gmane.emacs.bugs Subject: bug#1013: 23.0.60; permanent-local not honored for word-wrap Date: Mon, 22 Sep 2008 00:25:29 +0200 Message-ID: <48D6C9D9.3070302@gmail.com> References: <48D6AF35.7070208@gmail.com> Reply-To: "Lennart Borgman \(gmail\)" , 1013@emacsbugs.donarmstrong.com NNTP-Posting-Host: lo.gmane.org Mime-Version: 1.0 Content-Type: multipart/mixed; boundary="------------020502060105080401050503" X-Trace: ger.gmane.org 1222037276 27897 80.91.229.12 (21 Sep 2008 22:47:56 GMT) X-Complaints-To: usenet@ger.gmane.org NNTP-Posting-Date: Sun, 21 Sep 2008 22:47:56 +0000 (UTC) To: 1013@emacsbugs.donarmstrong.com Original-X-From: bug-gnu-emacs-bounces+geb-bug-gnu-emacs=m.gmane.org@gnu.org Mon Sep 22 00:48:52 2008 Return-path: Envelope-to: geb-bug-gnu-emacs@m.gmane.org Original-Received: from lists.gnu.org ([199.232.76.165]) by lo.gmane.org with esmtp (Exim 4.50) id 1KhXjW-00035K-Pl for geb-bug-gnu-emacs@m.gmane.org; Mon, 22 Sep 2008 00:48:51 +0200 Original-Received: from localhost ([127.0.0.1]:40944 helo=lists.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1KhXiU-0002On-Em for geb-bug-gnu-emacs@m.gmane.org; Sun, 21 Sep 2008 18:47:46 -0400 Original-Received: from mailman by lists.gnu.org with tmda-scanned (Exim 4.43) id 1KhXiR-0002Oi-09 for bug-gnu-emacs@gnu.org; Sun, 21 Sep 2008 18:47:43 -0400 Original-Received: from exim by lists.gnu.org with spam-scanned (Exim 4.43) id 1KhXiO-0002OW-Gv for bug-gnu-emacs@gnu.org; Sun, 21 Sep 2008 18:47:41 -0400 Original-Received: from [199.232.76.173] (port=53326 helo=monty-python.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1KhXiO-0002OT-BT for bug-gnu-emacs@gnu.org; Sun, 21 Sep 2008 18:47:40 -0400 Original-Received: from rzlab.ucr.edu ([138.23.92.77]:51042) by monty-python.gnu.org with esmtps (TLS-1.0:DHE_RSA_AES_256_CBC_SHA1:32) (Exim 4.60) (envelope-from ) id 1KhXiN-0006Fi-PV for bug-gnu-emacs@gnu.org; Sun, 21 Sep 2008 18:47:40 -0400 Original-Received: from rzlab.ucr.edu (rzlab.ucr.edu [127.0.0.1]) by rzlab.ucr.edu (8.13.8/8.13.8/Debian-3) with ESMTP id m8LMlalo006236; Sun, 21 Sep 2008 15:47:36 -0700 Original-Received: (from debbugs@localhost) by rzlab.ucr.edu (8.13.8/8.13.8/Submit) id m8LMZ5os001377; Sun, 21 Sep 2008 15:35:05 -0700 X-Loop: don@donarmstrong.com Resent-From: "Lennart Borgman (gmail)" Resent-To: bug-submit-list@donarmstrong.com Resent-CC: Emacs Bugs Resent-Date: Sun, 21 Sep 2008 22:35:05 +0000 Resent-Message-ID: Resent-Sender: don@donarmstrong.com X-Emacs-PR-Message: report 1013 X-Emacs-PR-Package: emacs X-Emacs-PR-Keywords: Original-Received: via spool by 1013-submit@emacsbugs.donarmstrong.com id=B1013.122203593831383 (code B ref 1013); Sun, 21 Sep 2008 22:35:05 +0000 Original-Received: (at 1013) by emacsbugs.donarmstrong.com; 21 Sep 2008 22:25:38 +0000 Original-Received: from ch-smtp02.sth.basefarm.net (ch-smtp02.sth.basefarm.net [80.76.149.213]) by rzlab.ucr.edu (8.13.8/8.13.8/Debian-3) with ESMTP id m8LMPYqx031274 for <1013@emacsbugs.donarmstrong.com>; Sun, 21 Sep 2008 15:25:35 -0700 Original-Received: from c83-254-151-87.bredband.comhem.se ([83.254.151.87]:61833 helo=[127.0.0.1]) by ch-smtp02.sth.basefarm.net with esmtp (Exim 4.68) (envelope-from ) id 1KhXMy-0001o8-8f for 1013@emacsbugs.donarmstrong.com; Mon, 22 Sep 2008 00:25:33 +0200 User-Agent: Mozilla/5.0 (Windows; U; Windows NT 5.1; en-US; rv:1.8.1.9) Gecko/20071031 Thunderbird/2.0.0.9 Mnenhy/0.7.5.666 In-Reply-To: <48D6AF35.7070208@gmail.com> X-Enigmail-Version: 0.95.7 X-Antivirus: avast! (VPS 080921-0, 2008-09-21), Outbound message X-Antivirus-Status: Clean X-Originating-IP: 83.254.151.87 X-Scan-Result: No virus found in message 1KhXMy-0001o8-8f. X-Scan-Signature: ch-smtp02.sth.basefarm.net 1KhXMy-0001o8-8f d362eabd38ff13c7f7fe071131e678c6 X-detected-operating-system: by monty-python.gnu.org: GNU/Linux 2.6 (newer, 3) Resent-Date: Sun, 21 Sep 2008 18:47:41 -0400 X-BeenThere: bug-gnu-emacs@gnu.org X-Mailman-Version: 2.1.5 Precedence: list List-Id: "Bug reports for GNU Emacs, the Swiss army knife of text editors" List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Original-Sender: bug-gnu-emacs-bounces+geb-bug-gnu-emacs=m.gmane.org@gnu.org Errors-To: bug-gnu-emacs-bounces+geb-bug-gnu-emacs=m.gmane.org@gnu.org Xref: news.gmane.org gmane.emacs.bugs:20691 Archived-At: This is a multi-part message in MIME format. --------------020502060105080401050503 Content-Type: text/plain; charset=ISO-8859-1 Content-Transfer-Encoding: 7bit I played a bit with making a unit test for this, see the attached file. This requires the ert2.el that comes with nXhtml and should be placed in the same subdir as nxhtmltest-suites.el. --------------020502060105080401050503 Content-Type: text/plain; name="emacstest-suites.el" Content-Transfer-Encoding: 7bit Content-Disposition: inline; filename="emacstest-suites.el" ;;; emacstest-suites.el --- Some unit tests for Emacs ;; ;; Author: Lennart Borgman (lennart O borgman A gmail O com) ;; Created: 2008-09-21T22:34:11+0200 Sun ;; Version: ;; Last-Updated: ;; URL: ;; Keywords: ;; Compatibility: ;; ;; Features that might be required by this library: ;; ;; None ;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;; ;;; Commentary: ;; ;; Unit tests for some Emacs bug reports. ;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;; ;;; Change log: ;; ;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;; ;; This program is free software; you can redistribute it and/or ;; modify it under the terms of the GNU General Public License as ;; published by the Free Software Foundation; either version 2, or ;; (at your option) any later version. ;; ;; This program is distributed in the hope that it will be useful, ;; but WITHOUT ANY WARRANTY; without even the implied warranty of ;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU ;; General Public License for more details. ;; ;; You should have received a copy of the GNU General Public License ;; along with this program; see the file COPYING. If not, write to ;; the Free Software Foundation, Inc., 51 Franklin Street, Fifth ;; Floor, Boston, MA 02110-1301, USA. ;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;; ;;; Code: (eval-when-compile (require 'cl)) (setq debug-on-error t) (defvar emacstest-bin (file-name-directory (if load-file-name load-file-name buffer-file-name))) (pushnew emacstest-bin load-path) (require 'ert2) (defvar emacstest-files-root (let* ((this-dir emacstest-bin) (root (expand-file-name "inemacs/" this-dir))) (unless (file-accessible-directory-p root) (error (if (file-exists-p root) "Can't read files in test directory %s" "Can't find test directory %s") root)) root)) (let ((distr-in "c:/EmacsW32/nxhtml/tests/inemacs/")) (when (file-directory-p distr-in) (setq nxhtmltest-files-root distr-in))) (ert-deftest emacs-bug1013 () "Emacs bug 1013. See URL `http://emacsbugs.donarmstrong.com/cgi-bin/bugreport.cgi?bug=1013'." (with-temp-buffer (insert " (defvar word-wrap2 nil) (make-variable-buffer-local 'word-wrap2) (defcustom word-wrap3 nil \"doc 3\" :type 'boolean) (make-variable-buffer-local 'word-wrap3) (put 'word-wrap 'permanent-local t) (put 'word-wrap2 'permanent-local t) (put 'word-wrap3 'permanent-local t) (setq word-wrap t) (setq word-wrap2 t) (setq word-wrap3 t) (kill-all-local-variables)") (eval-buffer) (ert-should (eq word-wrap3 t)) (ert-should (eq word-wrap2 t)) (ert-should (eq word-wrap t)) )) (provide 'emacstest-suites) ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;; emacstest-suites.el ends here --------------020502060105080401050503--