diff lisp/w3/w3-e19.el @ 16:0293115a14e9 r19-15b91

Import from CVS: tag r19-15b91
author cvs
date Mon, 13 Aug 2007 08:49:20 +0200
parents 9ee227acff29
children 441bb1e64a06
line wrap: on
line diff
--- a/lisp/w3/w3-e19.el	Mon Aug 13 08:48:43 2007 +0200
+++ b/lisp/w3/w3-e19.el	Mon Aug 13 08:49:20 2007 +0200
@@ -1,12 +1,12 @@
 ;;; w3-e19.el --- Emacs 19.xx specific functions for emacs-w3
 ;; Author: wmperry
-;; Created: 1996/12/31 15:38:51
-;; Version: 1.12
+;; Created: 1997/01/19 20:04:48
+;; Version: 1.16
 ;; Keywords: faces, help, mouse, hypermedia
 
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 ;;; Copyright (c) 1993 - 1996 by William M. Perry (wmperry@cs.indiana.edu)
-;;; Copyright (c) 1996 Free Software Foundation, Inc.
+;;; Copyright (c) 1996, 1997 Free Software Foundation, Inc.
 ;;;
 ;;; This file is part of GNU Emacs.
 ;;;
@@ -110,11 +110,11 @@
 	 (widget (and good pt (number-or-marker-p pt) (widget-at pt)))
 	 (link (and widget (or (widget-get widget 'href)
 			       (widget-get widget 'name))))
-	 (form (and widget (widget-get widget 'w3-form-data)))
+	 (form (and widget (widget-get widget :w3-form-data)))
 	 (imag nil) ; (nth 1 (memq 'w3graphic props))))
 	 )
     (cond
-     (link (w3-widget-echo widget))
+     (link (message "%s" (w3-widget-echo widget)))
      (form
       (cond
        ((eq 'submit (w3-form-element-type form))