[Emacs-diffs] Changes to emacs/lisp/minibuffer.el,v

[Eli Zaretskii]

CVSROOT:        /cvsroot/emacs
Module name:    emacs
Changes by:     Eli Zaretskii <eliz>    08/10/19 21:06:03

Index: minibuffer.el
===================================================================
RCS file: /cvsroot/emacs/emacs/lisp/minibuffer.el,v
retrieving revision 1.58
retrieving revision 1.59
diff -u -b -r1.58 -r1.59
--- minibuffer.el       3 Sep 2008 14:09:50 -0000       1.58
+++ minibuffer.el       19 Oct 2008 21:06:03 -0000      1.59
@@ -96,14 +96,6 @@
     (or res
         (if firsterror (signal (car firsterror) (cdr firsterror))))))
 
-(defun apply-partially (fun &rest args)
-  "Do a \"curried\" partial application of FUN to ARGS.
-ARGS is a list of the first N arguments to pass to FUN.
-The result is a new function that takes the remaining arguments,
-and calls FUN."
-  (lexical-let ((fun fun) (args1 args))
-    (lambda (&rest args2) (apply fun (append args1 args2)))))
-
 (defun complete-with-action (action table string pred)
   "Perform completion ACTION.
 STRING is the string to complete.