custom and defalias

custom and defalias

[Luc Teirlinck]

I relatively recently committed the patch below to custom.el.  What
the patch did was make Custom recognize aliases.  For instance, the
option `blink-cursor' was recently declared obsolete and made into an
alias for `blink-cursor-mode'.  Without the patch, if blink-cursor was
set in the `custom-set-variables' form, it would no longer get recognized.
After the patch it is recognized.  But then Custom updates the
obsolete `blink-cursor' with `blink-cursor-mode', which would be
ideal, except that if one then uses the same custom-set-variables form
in Emacs 21.3, it does not work any more.

I do not know what to do with this.

Here is the patch.  To avoid confusion, it was _already_ installed a
little while ago.

===File ~/custom.el-diff====================================
*** custom.el	10 Feb 2005 09:52:54 -0600	1.79
--- custom.el	10 Feb 2005 20:04:47 -0600	
***************
*** 777,783 ****
      (while args
        (let ((entry (car args)))
  	(if (listp entry)
! 	    (let* ((symbol (nth 0 entry))
  		   (value (nth 1 entry))
  		   (now (nth 2 entry))
  		   (requests (nth 3 entry))
--- 777,783 ----
      (while args
        (let ((entry (car args)))
  	(if (listp entry)
! 	    (let* ((symbol (indirect-variable (nth 0 entry)))
  		   (value (nth 1 entry))
  		   (now (nth 2 entry))
  		   (requests (nth 3 entry))
***************
*** 809,815 ****
  	  (message "Warning: old format `custom-set-variables'")
  	  (ding)
  	  (sit-for 2)
! 	  (let ((symbol (nth 0 args))
  		(value (nth 1 args)))
  	    (put symbol 'saved-value (list value))
              (custom-push-theme 'theme-value symbol theme 'set value))
--- 809,815 ----
  	  (message "Warning: old format `custom-set-variables'")
  	  (ding)
  	  (sit-for 2)
! 	  (let ((symbol (indirect-variable (nth 0 args)))
  		(value (nth 1 args)))
  	    (put symbol 'saved-value (list value))
              (custom-push-theme 'theme-value symbol theme 'set value))
============================================================

Re: custom and defalias

[Richard Stallman]

    I relatively recently committed the patch below to custom.el.  What
    the patch did was make Custom recognize aliases.  For instance, the
    option `blink-cursor' was recently declared obsolete and made into an
    alias for `blink-cursor-mode'.  Without the patch, if blink-cursor was
    set in the `custom-set-variables' form, it would no longer get recognized.
    After the patch it is recognized.  But then Custom updates the
    obsolete `blink-cursor' with `blink-cursor-mode', which would be
    ideal, except that if one then uses the same custom-set-variables form
    in Emacs 21.3, it does not work any more.

    I do not know what to do with this.

Unless someone has an idea for a change that is clearly desirable,
we should just live with it.