Re: [O] [BUG] org-link-search fails if search string contains new lines

[Skip Collins]

Test test-org/fuzzy-links backtrace:
  (if (unwind-protect (setq value-10839 (let ((file (make-temp-file "o
  (let (form-description-10840) (if (unwind-protect (setq value-10839
  (let ((value-10839 (cl-gensym "ert-form-evaluation-aborted-"))) (let
  (lambda nil (let ((value-10802 (cl-gensym "ert-form-evaluation-abort
  ert--run-test-internal([cl-struct-ert--test-execution-info [cl-struc
  ert-run-test([cl-struct-ert-test test-org/fuzzy-links "Test fuzzy li
  ert-run-or-rerun-test([cl-struct-ert--stats "\\(org\\|ob\\)" [[cl-st
  ert-run-tests("\\(org\\|ob\\)" #[385 "\306\307\"\203G\211\211G\310
  ert-run-tests-batch("\\(org\\|ob\\)")
  ert-run-tests-batch-and-exit("\\(org\\|ob\\)")
  (let ((org-id-track-globally t) (org-test-selector (if org-test-sele
  org-test-run-batch-tests("\\(org\\|ob\\)")
  eval((org-test-run-batch-tests org-test-select-re))
  command-line-1(("--eval" "(setq vc-handled-backends nil org-startup-
  command-line()
  normal-top-level()
Test test-org/fuzzy-links condition:
    (ert-test-failed
     ((should
       (org-test-with-temp-text-in-file "Paragraph

line1
line2

"
(let ... ... ... ... ... ...)))
      :form
      (let
 ((file ...)
  (kill-buffer-query-functions nil)
  (inside-text ...)
  G10838)
(with-temp-file file
 (insert inside-text))
(find-file file)
(org-mode)
(setq G10838
     (progn ...))
(save-buffer)
(kill-buffer
(current-buffer))
(delete-file file)
G10838)
      :value nil))
   FAILED  656/718  test-org/fuzzy-links