2 files changed, 7 insertions, 4 deletions

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 21706156689..697dbfe9ece 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
+2009-03-10  Jason Rumney  <jasonr@gnu.org>
+
+        * w32-vars.el (w32-list-proportional-fonts): Make obsolete.
+
 2009-03-10  Stefan Monnier  <monnier@iro.umontreal.ca>
 
         * server.el (server-process-filter): Use expand-file-name rather than
diff --git a/lisp/w32-vars.el b/lisp/w32-vars.el
index 97a8758c46d..0fb1e8c8fba 100644
--- a/lisp/w32-vars.el
+++ b/lisp/w32-vars.el
@@ -40,10 +40,9 @@ X does.  See `w32-fixed-font-alist' for the font menu definition."
   :type 'boolean
   :group 'w32)
 
-(defcustom w32-list-proportional-fonts nil
-  "Include proportional fonts in the default font dialog."
-  :type 'boolean
-  :group 'w32)
+(defvar w32-list-proportional-fonts nil
+  "Include proportional fonts in the default font dialog.")
+(make-obsolete-variable w32-list-proportional-fonts "No longer used" "23.1")
 
 (defcustom w32-allow-system-shell nil
   "Disable startup warning when using \"system\" shells."