@Eli, @Drew

Would this psuedocode work?

(progn
  ;; Possible values: nil, 'quick, 'verbose
  ;; (defconst yes-or-no-option nil)
  ;; (defconst yes-or-no-option 'quick)
  (defconst yes-or-no-option 'verbose)
  ;; If nil, yes-or-no-p and y-or-n-p will work their traditional ways
  ;; If 'quick , both yes-or-no-p and y-or-n-p will work like y-or-n-p
  ;; If 'verbose , both yes-or-no-p and y-or-n-p will work like yes-or-no-p

  ;; yes-or-no-p now implemented in elisp instead of C
  (defun yes-or-no-p (prompt)
    (if (eq yes-or-no-option 'quick)
        (message "y/n")
      (message "yes/no")))

  ;; y-or-n-p redefined
  (defun y-or-n-p (prompt)
    (let* ((orig--yes-or-no-option yes-or-no-option)
           (yes-or-no-option (if (eq orig--yes-or-no-option 'verbose)
                                 'verbose
                               'quick)))
      (yes-or-no-p prompt)))

  (message "yes-or-no-p:")
  (yes-or-no-p "Q? ")
  (message "y-or-n-p:")
  (y-or-n-p "Q? ")
  nil)

On Fri, Sep 4, 2015 at 2:50 PM David Kastrup <dak@gnu.org> wrote:

> Eli Zaretskii <eliz@gnu.org> writes:
>
> >> From: David Kastrup <dak@gnu.org>
> >> Cc: Alan Mackenzie <acm@muc.de>, kaushal.modi@gmail.com,
> >> bruce.connor.am@gmail.com, emacs-devel@gnu.org,
> >> schwab@linux-m68k.org, monnier@iro.umontreal.ca, dgutov@yandex.ru,
> >> drew.adams@oracle.com
> >> Date: Fri, 04 Sep 2015 20:14:51 +0200
> >>
> >> Eli Zaretskii <eliz@gnu.org> writes:
> >>
> >> > The intent is to provide a predicate defcustom that allows to cause
> >> > yes-or-no-p behave like y-or-n-p.  y-or-n-p will always behave as it
> >> > does, and I didn't intend to change that, as I don't see the use case
> >> > for that.
> >>
> >> Reliable translation into selection boxes when feeding emacs -batch from
> >> a script?
> >
> > y-or-n-p already does TRT in that case (no dialog boxes in -batch).
>
> Feeding emacs -batch _from_ a script.  Meaning the script supplies "yes"
> and "no".
>
> >> Predictable behavior when navigating Emacs by voice?
> >
> > I don't see the relevance, please elaborate.
>
> Same as above.  External input translated into a source for consumption
> by Emacs.
>
> >> Some people may prefer saying "yes" to saying "why".
> >
> > Likewise.
>
> "why" is phonetically the same as "y".  Which means that it's likely
> harder to generate just "y" from voice than "yes".
>
> --
> David Kastrup
>