Browse Source

Clean up spacing to pass Emacs's pre-commit check

Avoid trailing spaces and spaces before tabs.
Kyle Meyer 2 years ago
parent
commit
b196a05f5a
8 changed files with 24 additions and 24 deletions
  1. 4 4
      doc/org-manual.org
  2. 3 3
      etc/ORG-NEWS
  3. 1 1
      lisp/org-agenda.el
  4. 5 5
      lisp/org-element.el
  5. 3 3
      lisp/org-fold-core.el
  6. 5 5
      lisp/org-fold.el
  7. 2 2
      lisp/org.el
  8. 1 1
      lisp/ox-latex.el

+ 4 - 4
doc/org-manual.org

@@ -6803,7 +6803,7 @@ using the =:formatter= parameter.
 - =:filetitle= ::
 - =:filetitle= ::
 
 
   Show title in the file column if the file has a =#+title=.
   Show title in the file column if the file has a =#+title=.
- 
+
 - =:hidefiles= ::
 - =:hidefiles= ::
 
 
   Hide the file column when multiple files are used to produce the
   Hide the file column when multiple files are used to produce the
@@ -13396,7 +13396,7 @@ general options (see [[*Export Settings]]).
   #+cindex: @samp{LANGUAGE}, keyword
   #+cindex: @samp{LANGUAGE}, keyword
   #+vindex: org-latex-packages-alist
   #+vindex: org-latex-packages-alist
   #+vindex: org-latex-language-alist
   #+vindex: org-latex-language-alist
-  
+
   Language code of the primary document language.
   Language code of the primary document language.
 
 
   The list of language codes supported by Org is stored in the
   The list of language codes supported by Org is stored in the
@@ -18420,7 +18420,7 @@ results do not have a distinct name.
 
 
 Note that all the links pointing to a source block exported using
 Note that all the links pointing to a source block exported using
 =:exports none= will be broken.  This will make export process fail,
 =:exports none= will be broken.  This will make export process fail,
-unless broken links are allowed during export (see [[*Export Settings]]). 
+unless broken links are allowed during export (see [[*Export Settings]]).
 
 
 #+vindex: org-export-use-babel
 #+vindex: org-export-use-babel
 To stop Org from evaluating code blocks to speed exports, use the
 To stop Org from evaluating code blocks to speed exports, use the
@@ -22525,7 +22525,7 @@ within a buffer with the =STARTUP= options =inlineimages= and
 =noinlineimages=.
 =noinlineimages=.
 
 
 [fn:120] The width can be customized in Emacs >= 24.1, built with
 [fn:120] The width can be customized in Emacs >= 24.1, built with
-imagemagick support. 
+imagemagick support.
 
 
 [fn:121] The corresponding in-buffer setting is: =#+STARTUP: fninline=
 [fn:121] The corresponding in-buffer setting is: =#+STARTUP: fninline=
 or =#+STARTUP: nofninline=.
 or =#+STARTUP: nofninline=.

+ 3 - 3
etc/ORG-NEWS

@@ -239,7 +239,7 @@ produce results superior to Minted or Listings.
 *** Support for =#+include=-ing URLs
 *** Support for =#+include=-ing URLs
 
 
 =#+include: FILE= will now accept URLs as the file.
 =#+include: FILE= will now accept URLs as the file.
-*** Structure templates now respect case used in ~org-structure-template-alist~ 
+*** Structure templates now respect case used in ~org-structure-template-alist~
 
 
 The block type in ~org-structure-template-alist~ is not case-sensitive.
 The block type in ~org-structure-template-alist~ is not case-sensitive.
 When the block type starts from the upper case, structure template
 When the block type starts from the upper case, structure template
@@ -348,7 +348,7 @@ The folding state can also be controlled on per-file basis using
 *** New custom setting ~org-icalendar-force-alarm~
 *** New custom setting ~org-icalendar-force-alarm~
 
 
 The new setting, when set to non-nil, makes Org create alarm at the
 The new setting, when set to non-nil, makes Org create alarm at the
-event time when the alarm time is set to 0.  The default value is 
+event time when the alarm time is set to 0.  The default value is
 nil -- do not create alarms at the event time.
 nil -- do not create alarms at the event time.
 
 
 ** New functions and changes in function arguments
 ** New functions and changes in function arguments
@@ -493,7 +493,7 @@ restore earlier behavior add to your Emacs init file the following:
     (org-link-set-parameters "info" :insert-description nil))
     (org-link-set-parameters "info" :insert-description nil))
 #+end_src
 #+end_src
 
 
-*** New list of languages for LaTeX export: ~org-latex-language-alist~ 
+*** New list of languages for LaTeX export: ~org-latex-language-alist~
 
 
 ~org-latex-language-alist~ unifies into a single list the old language
 ~org-latex-language-alist~ unifies into a single list the old language
 lists for the =babel= and =polyglossia= LaTeX packages:
 lists for the =babel= and =polyglossia= LaTeX packages:

+ 1 - 1
lisp/org-agenda.el

@@ -5934,7 +5934,7 @@ displayed in agenda view."
 	(setq result (org-diary-sexp-entry sexp sexp-entry date))
 	(setq result (org-diary-sexp-entry sexp sexp-entry date))
 	(when result
 	(when result
           ;; Only check if entry should be skipped on matching sexps.
           ;; Only check if entry should be skipped on matching sexps.
- 	  (org-agenda-skip (org-element-at-point))
+          (org-agenda-skip (org-element-at-point))
 	  (setq marker (org-agenda-new-marker beg)
 	  (setq marker (org-agenda-new-marker beg)
 		level (make-string (org-reduced-level (org-outline-level)) ? )
 		level (make-string (org-reduced-level (org-outline-level)) ? )
 		category (org-get-category beg)
 		category (org-get-category beg)

+ 5 - 5
lisp/org-element.el

@@ -5357,7 +5357,7 @@ This extra caching is based on the following paper:
 Pugh [Information Processing Letters] (1990) Slow optimally balanced
 Pugh [Information Processing Letters] (1990) Slow optimally balanced
  search strategies vs. cached fast uniformly balanced search
  search strategies vs. cached fast uniformly balanced search
  strategies.  http://dx.doi.org/10.1016/0020-0190(90)90130-P
  strategies.  http://dx.doi.org/10.1016/0020-0190(90)90130-P
- 
+
 Also, see `org-element--cache-hash-left' and `org-element--cache-hash-right'.")
 Also, see `org-element--cache-hash-left' and `org-element--cache-hash-right'.")
 (defvar-local org-element--cache-hash-left nil
 (defvar-local org-element--cache-hash-left nil
   "Cached elements from `org-element--cache' for fast O(1) lookup.
   "Cached elements from `org-element--cache' for fast O(1) lookup.
@@ -5714,7 +5714,7 @@ This extra caching is based on the following paper:
 Pugh [Information Processing Letters] (1990) Slow optimally balanced
 Pugh [Information Processing Letters] (1990) Slow optimally balanced
  search strategies vs. cached fast uniformly balanced search
  search strategies vs. cached fast uniformly balanced search
  strategies.  http://dx.doi.org/10.1016/0020-0190(90)90130-P
  strategies.  http://dx.doi.org/10.1016/0020-0190(90)90130-P
- 
+
 Also, see `org-element--cache-size'."
 Also, see `org-element--cache-size'."
   (interactive)
   (interactive)
   (message "%.2f%% of cache searches hashed, %.2f%% non-hashable."
   (message "%.2f%% of cache searches hashed, %.2f%% non-hashable."
@@ -6307,7 +6307,7 @@ completing the request."
                       ;; Consider scenario when DATA lays within
                       ;; Consider scenario when DATA lays within
                       ;; sensitive lines of PARENT that was found
                       ;; sensitive lines of PARENT that was found
                       ;; during phase 2.  For example:
                       ;; during phase 2.  For example:
-                      ;; 
+                      ;;
                       ;; #+ begin_quote
                       ;; #+ begin_quote
                       ;; Paragraph
                       ;; Paragraph
                       ;; #+end_quote
                       ;; #+end_quote
@@ -7604,7 +7604,7 @@ the cache."
                             (move-start-to-next-match
                             (move-start-to-next-match
                              (if last-match next-re fail-re)))
                              (if last-match next-re fail-re)))
                           (when (and (or (not start) (eq (org-element-property :begin data) start))
                           (when (and (or (not start) (eq (org-element-property :begin data) start))
-                                     (< (org-element-property :begin data) to-pos)) 
+                                     (< (org-element-property :begin data) to-pos))
                             ;; Calculate where next possible element
                             ;; Calculate where next possible element
                             ;; starts and update START if needed.
                             ;; starts and update START if needed.
 		            (setq start (next-element-start))
 		            (setq start (next-element-start))
@@ -7625,7 +7625,7 @@ the cache."
                             (when (or (not restrict-elements)
                             (when (or (not restrict-elements)
                                       (memq (org-element-type data) restrict-elements))
                                       (memq (org-element-type data) restrict-elements))
                               ;; DATA matches restriction.  FUNC may
                               ;; DATA matches restriction.  FUNC may
-                              ;; 
+                              ;;
                               ;; Call FUNC.  FUNC may move point.
                               ;; Call FUNC.  FUNC may move point.
                               (setq org-element-cache-map-continue-from nil)
                               (setq org-element-cache-map-continue-from nil)
                               (if org-element--cache-map-statistics
                               (if org-element--cache-map-statistics

+ 3 - 3
lisp/org-fold-core.el

@@ -64,14 +64,14 @@
 ;; Consider the following Org mode link:
 ;; Consider the following Org mode link:
 ;; [[file:/path/to/file/file.ext][description]]
 ;; [[file:/path/to/file/file.ext][description]]
 ;; Only the word "description" is normally visible in this link.
 ;; Only the word "description" is normally visible in this link.
-;; 
+;;
 ;; The way this partial visibility is achieved is combining the two
 ;; The way this partial visibility is achieved is combining the two
 ;; folding specs.  The whole link is folded using 'org-fold-hidden
 ;; folding specs.  The whole link is folded using 'org-fold-hidden
 ;; folding spec, but the visible part is additionally folded using
 ;; folding spec, but the visible part is additionally folded using
 ;; 'org-fold-visible:
 ;; 'org-fold-visible:
 ;;
 ;;
 ;; <begin org-fold-hidden>[[file:/path/to/file/file.ext][<begin org-fold-visible>description<end org-fold-visible>]]<end org-fold-hidden>
 ;; <begin org-fold-hidden>[[file:/path/to/file/file.ext][<begin org-fold-visible>description<end org-fold-visible>]]<end org-fold-hidden>
-;; 
+;;
 ;; Because 'org-fold-visible has higher priority than
 ;; Because 'org-fold-visible has higher priority than
 ;; 'org-fold-hidden, it suppresses the 'org-fold-hidden effect and
 ;; 'org-fold-hidden, it suppresses the 'org-fold-hidden effect and
 ;; thus reveals the description part of the link.
 ;; thus reveals the description part of the link.
@@ -330,7 +330,7 @@ following symbols:
   of the folded regions may become visible for some external packages
   of the folded regions may become visible for some external packages
   inserting text using `insert' instead of `insert-and-inherit' (the
   inserting text using `insert' instead of `insert-and-inherit' (the
   latter is rarely used in practice).
   latter is rarely used in practice).
-  
+
 - `ignore-indirect': Do not decouple folding state in the indirect
 - `ignore-indirect': Do not decouple folding state in the indirect
   buffers.  This can speed up Emacs display engine (and thus motion of
   buffers.  This can speed up Emacs display engine (and thus motion of
   point), especially when large number of indirect buffers is being
   point), especially when large number of indirect buffers is being

+ 5 - 5
lisp/org-fold.el

@@ -325,9 +325,9 @@ When ENTRY is non-nil, show the entire entry."
        (line-end-position 0)
        (line-end-position 0)
        (save-excursion
        (save-excursion
          (if (re-search-forward
          (if (re-search-forward
- 	      (concat "[\r\n]" (org-get-limited-outline-regexp)) nil t)
+              (concat "[\r\n]" (org-get-limited-outline-regexp)) nil t)
              (line-end-position 0)
              (line-end-position 0)
- 	   (point-max)))
+           (point-max)))
        t
        t
        'outline))))
        'outline))))
 
 
@@ -398,9 +398,9 @@ Show the heading too, if it is currently invisible."
      (line-end-position 0)
      (line-end-position 0)
      (save-excursion
      (save-excursion
        (if (re-search-forward
        (if (re-search-forward
- 	    (concat "[\r\n]\\(" (org-get-limited-outline-regexp) "\\)") nil t)
- 	   (match-beginning 1)
- 	 (point-max)))
+            (concat "[\r\n]\\(" (org-get-limited-outline-regexp) "\\)") nil t)
+           (match-beginning 1)
+         (point-max)))
      nil
      nil
      'outline)
      'outline)
     (when hide-drawers (org-cycle-hide-drawers 'children))))
     (when hide-drawers (org-cycle-hide-drawers 'children))))

+ 2 - 2
lisp/org.el

@@ -7950,8 +7950,8 @@ the whole buffer."
                    (put-text-property
                    (put-text-property
                     (save-excursion (org-back-to-heading-or-point-min t))
                     (save-excursion (org-back-to-heading-or-point-min t))
                     (save-excursion (if (org-before-first-heading-p)
                     (save-excursion (if (org-before-first-heading-p)
-        			        (point-max)
-        			      (org-end-of-subtree t t)))
+                                        (point-max)
+                                      (org-end-of-subtree t t)))
                     'org-category
                     'org-category
                     value)))))))))))
                     value)))))))))))
 
 

+ 1 - 1
lisp/ox-latex.el

@@ -1974,7 +1974,7 @@ holding export options."
      ;; Date.
      ;; Date.
      ;; LaTeX displays today's date by default. One can override this by
      ;; LaTeX displays today's date by default. One can override this by
      ;; inserting \date{} for no date, or \date{string} with any other
      ;; inserting \date{} for no date, or \date{string} with any other
-     ;; string to be displayed as the date. 
+     ;; string to be displayed as the date.
      (let ((date (and (plist-get info :with-date) (org-export-get-date info))))
      (let ((date (and (plist-get info :with-date) (org-export-get-date info))))
        (format "\\date{%s}\n" (org-export-data date info)))
        (format "\\date{%s}\n" (org-export-data date info)))
      ;; Title and subtitle.
      ;; Title and subtitle.