Mercurial > hg > xemacs-beta
diff lisp/w3/w3-vars.el @ 100:4be1180a9e89 r20-1b2
Import from CVS: tag r20-1b2
author | cvs |
---|---|
date | Mon, 13 Aug 2007 09:15:11 +0200 |
parents | 0d2f883870bc |
children | a145efe76779 |
line wrap: on
line diff
--- a/lisp/w3/w3-vars.el Mon Aug 13 09:13:58 2007 +0200 +++ b/lisp/w3/w3-vars.el Mon Aug 13 09:15:11 2007 +0200 @@ -1,7 +1,7 @@ ;;; w3-vars.el,v --- All variable definitions for emacs-w3 ;; Author: wmperry -;; Created: 1997/02/14 17:57:21 -;; Version: 1.89 +;; Created: 1997/02/15 23:38:52 +;; Version: 1.91 ;; Keywords: comm, help, hypermedia ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; @@ -30,7 +30,7 @@ ;;; Variable definitions for w3 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; (defconst w3-version-number - (let ((x "p3.0.59")) + (let ((x "p3.0.60")) (if (string-match "State:[ \t\n]+.\\([^ \t\n]+\\)" x) (setq x (substring x (match-beginning 1) (match-end 1))) (setq x (substring x 1))) @@ -38,7 +38,7 @@ (function (lambda (x) (if (= x ?-) "." (char-to-string x)))) x "")) "Version # of w3-mode.") -(defconst w3-version-date (let ((x "1997/02/14 17:57:21")) +(defconst w3-version-date (let ((x "1997/02/15 23:38:52")) (if (string-match "Date: \\([^ \t\n]+\\)" x) (substring x (match-beginning 1) (match-end 1)) x)) @@ -80,6 +80,9 @@ (defvar w3-default-stylesheet nil "*The filename of the users default stylesheet.") +(defvar w3-display-frames nil + "*Fetch frames - not optimal.") + (defvar w3-do-incremental-display nil "*Whether to do incremental display of pages or not.")