заменил на replace-regexp-in-string

бля чо rustc нужен будет для сборки?

Opt in

а require не перегружает фичу если она уже есть в features

ну и разве нельзя в ol-telega добавить autoloads?

нашёл в tramp-compat.el alias для file-name-concat, который из 28.1, и он не работает:

(defalias 'tramp-compat-file-name-concat
  (if (fboundp 'file-name-concat)
      #'file-name-concat
    (lambda (directory &rest components)
      (unless (null directory)
 (let ((components (delq nil components))
       file-name-handler-alist)
   (if (null components)
       directory
     (tramp-compat-file-name-concat
      (concat (file-name-as-directory directory) (car components))
      (cdr components))))))))

Исправил на это:

(defalias 'scratch-file-name-concat
  (if (fboundp 'file-name-concat)
      #'file-name-concat
    (lambda (directory &rest components)
      (let ((components (cl-remove-if (lambda (el)
                                        (or (null el) (equal "" el)))
                                      components))
     file-name-handler-alist)
        (if (null components)
     directory
   (eval `(scratch-file-name-concat
           ,(concat (unless (or (equal "" directory) (null directory))
                             (file-name-as-directory directory))
                           (car components))
           ,@(cdr components))))))))

Адекватное ли это решение? почему-то код с eval всегда какие-то сомнения вызывает.

огласите задачу

и на первый взгляд ваще непонятно, зачем тут eval

квотить чтобы потом тут же эвалить?

я вас eval

read-ал и print-ал

Автолоадить нечего.  org-store-link и так автолоадится.

Я добавил эдвайс, но эдвайзить чужие функции нехорошо.

чтобы components сплайсить

apply кому придумали?

даже так

используй eldev

да, действительно, спасибо

хорошо, попробую