[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Re: address@hidden: links in Help buffer aren'talwayscorrect]
From: |
Kevin Rodgers |
Subject: |
Re: address@hidden: links in Help buffer aren'talwayscorrect] |
Date: |
Tue, 20 Dec 2005 12:10:47 -0700 |
User-agent: |
Mozilla Thunderbird 0.9 (X11/20041105) |
Kevin Rodgers wrote:
> "Richard M. Stallman" <address@hidden> wrote:
>
>>It looks like this code extracts the list of frame parameter names
>>when it is _loaded_. That is inconvenient. Could you
>>do that when the function is called for the first time?
>
> ...
>
>>replace-regexp is meant for users; could you please write a simple
>>while loop instead?
>
>
> Sure, this version fixes both concerns.
According to Stefan, the following can be simplified in Emacs 22:
> ;; in Emacs 21.4 there are 41 documented frame parameters; 83
> ;; is the smallest prime that's at least twice that:
> (param-table (let ((table (make-vector 83 0)))
> (mapc (lambda (assoc)
> (intern (symbol-name (car assoc))
table))
> (or frame-parameter-docstring-alist
> (setq frame-parameter-docstring-alist
>
(default-frame-parameter-docstring-alist))))
> (mapc (lambda (assoc)
> (intern (symbol-name (car assoc))
table))
> (frame-parameters nil))
> table))
To just:
(param-table
(mapcar (lambda (assoc) (symbol-name (car assoc)))
(nconc (frame-parameters nil)
(or frame-parameter-docstring-alist
(setq frame-parameter-docstring-alist
(default-frame-parameter-docstring-alist))))))
--
Kevin