small space change.

[org-ref.git] / org-ref.el

diff --git a/org-ref.el b/org-ref.el
index 240adda8562d2f43b4a055d4a11727d33e289c3b..ac6422a7f27637983b5ad33ff02b0d8abb56509f 100644 (file)
--- a/org-ref.el
+++ b/org-ref.el
@@ -504,7 +504,8 @@ Format according to the type in `org-ref-bibliography-entry-format'."
                 (loop for file in org-ref-bibliography-files do
                       (if (org-ref-key-in-file-p key (file-truename file))
                           (throw 'result file)
                 (loop for file in org-ref-bibliography-files do
                       (if (org-ref-key-in-file-p key (file-truename file))
                           (throw 'result file)

-                        (message "%s not found in %s" key (file-truename file))))))
+                        (message "%s not found in %s"
+                                 key (file-truename file))))))

 
     (with-temp-buffer
       (insert-file-contents file)
 
     (with-temp-buffer
       (insert-file-contents file)


@@ -992,10 +993,8 @@ ARG does nothing."
    "on clicking goto the label. Navigate back with C-c &"
    (org-mark-ring-push)
    ;; next search from beginning of the buffer
    "on clicking goto the label. Navigate back with C-c &"
    (org-mark-ring-push)
    ;; next search from beginning of the buffer

-

    ;; it is possible you would not find the label if narrowing is in effect
    (widen)
    ;; it is possible you would not find the label if narrowing is in effect
    (widen)

-

    (unless
        (or
        ;; our label links
    (unless
        (or
        ;; our label links


@@ -1011,12 +1010,14 @@ ARG does nothing."
        ;; #+label: name  org-definition
        (progn
          (goto-char (point-min))
        ;; #+label: name  org-definition
        (progn
          (goto-char (point-min))

-         (re-search-forward (format "^#\\+label:\\s-*\\(%s\\)\\b" label) nil t))
+         (re-search-forward
+          (format "^#\\+label:\\s-*\\(%s\\)\\b" label) nil t))

 
        ;; org tblname
        (progn
          (goto-char (point-min))
 
        ;; org tblname
        (progn
          (goto-char (point-min))

-         (re-search-forward (format "^#\\+tblname:\\s-*\\(%s\\)\\b" label) nil t))
+         (re-search-forward
+          (format "^#\\+tblname:\\s-*\\(%s\\)\\b" label) nil t)))

 
      ;; we did not find anything, so go back to where we came
      (org-mark-ring-goto)
 
      ;; we did not find anything, so go back to where we came
      (org-mark-ring-goto)