 
 (require 'subr-x)
 (require 'cl-lib)
-
-;;;; Compatibility
-
-(eval-and-compile
-  (when (version< emacs-version "26")
-    (with-no-warnings
-      (defalias 'if-let* #'if-let)
-      (defalias 'when-let* #'when-let)
-      (function-put #'if-let* 'lisp-indent-function 2)
-      (function-put #'when-let* 'lisp-indent-function 1))))
 
 ;;;; User-facing variables
 

patch's original definition. NAME and TYPE are as returned by
`el-patch-get'."
  (interactive (el-patch--select-patch))
  (if-let* ((patch-definition (el-patch-get name type)))
      (let* ((expected-definition (el-patch--resolve-definition
                                   patch-definition nil))
             (name (cadr expected-definition))

       (list name))
      ((quote define-minor-mode)
       (list (cons 'defun name)
             (or (when-let ((rest (member :variable body)))
                   (cadr rest))
                 name)))
      (_ (error "Unexpected definition type %S" type)))))
