emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[nongnu] elpa/hyperdrive f5ca8e882c 01/16: Docs: Indentation


From: ELPA Syncer
Subject: [nongnu] elpa/hyperdrive f5ca8e882c 01/16: Docs: Indentation
Date: Sat, 2 Dec 2023 18:59:40 -0500 (EST)

branch: elpa/hyperdrive
commit f5ca8e882cd6591b5e40058b7e83b3bb37651a83
Author: Joseph Turner <joseph@ushin.org>
Commit: Joseph Turner <joseph@ushin.org>

    Docs: Indentation
---
 doc/hyperdrive.org  | 23 ++++++++++++++++-------
 doc/hyperdrive.texi | 23 ++++++++++++++++-------
 2 files changed, 32 insertions(+), 14 deletions(-)

diff --git a/doc/hyperdrive.org b/doc/hyperdrive.org
index 2be945e6fe..61a8f57ebb 100644
--- a/doc/hyperdrive.org
+++ b/doc/hyperdrive.org
@@ -686,7 +686,10 @@ files from your local filesystem's ~~/blog/~ directory 
into the ~/blog/~
 directory of a hyperdrive you previously created with petname ~"foo"~:
 
 #+begin_src elisp
-  (hyperdrive-mirror "~/blog/" (hyperdrive-by-slot 'petname "foo") "/blog/")
+  (hyperdrive-mirror
+   "~/blog/"
+   (hyperdrive-by-slot 'petname "foo")
+   "/blog/")
 #+end_src
 
 To upload the same files without confirmation, add ~:no-confirm t~.
@@ -697,8 +700,11 @@ following snippet includes a ~FILTER~ key whose value is a 
regular
 expression against which every expanded filename will be tested.
 
 #+begin_src elisp
-  (hyperdrive-mirror "~/blog/" (hyperdrive-by-slot 'petname "foo") "/blog/"
-                     :filter "_public")
+  (hyperdrive-mirror
+   "~/blog/"
+   (hyperdrive-by-slot 'petname "foo")
+   "/blog/"
+   :filter "_public")
 #+end_src
 
 Alternatively, you could select files by tag with Karl Voit's
@@ -710,10 +716,13 @@ as its only argument. For example, the following snippet 
will mirror
 only those files in ~~/blog/~ which are smaller than 5MB:
 
 #+begin_src elisp
-  (hyperdrive-mirror "~/blog/" (hyperdrive-by-slot 'petname "foo") "/blog/"
-                     :filter (lambda (file) (> (* 5 1024 1024)
-                                                (file-attribute-size
-                                                 (file-attributes file)))))
+  (hyperdrive-mirror
+   "~/blog/"
+   (hyperdrive-by-slot 'petname "foo")
+   "/blog/"
+   :filter (lambda (file) (> (* 5 1024 1024)
+                        (file-attribute-size
+                         (file-attributes file)))))
 #+end_src
 
 ** Miscellaneous features
diff --git a/doc/hyperdrive.texi b/doc/hyperdrive.texi
index 9a3127e196..1b3741accb 100644
--- a/doc/hyperdrive.texi
+++ b/doc/hyperdrive.texi
@@ -993,7 +993,10 @@ files from your local filesystem's @code{~/blog/} 
directory into the @code{/blog
 directory of a hyperdrive you previously created with petname @code{"foo"}:
 
 @lisp
-(hyperdrive-mirror "~/blog/" (hyperdrive-by-slot 'petname "foo") "/blog/")
+(hyperdrive-mirror
+ "~/blog/"
+ (hyperdrive-by-slot 'petname "foo")
+ "/blog/")
 @end lisp
 
 To upload the same files without confirmation, add @code{:no-confirm t}.
@@ -1004,8 +1007,11 @@ following snippet includes a @code{FILTER} key whose 
value is a regular
 expression against which every expanded filename will be tested.
 
 @lisp
-(hyperdrive-mirror "~/blog/" (hyperdrive-by-slot 'petname "foo") "/blog/"
-                   :filter "_public")
+(hyperdrive-mirror
+ "~/blog/"
+ (hyperdrive-by-slot 'petname "foo")
+ "/blog/"
+ :filter "_public")
 @end lisp
 
 Alternatively, you could select files by tag with Karl Voit's
@@ -1017,10 +1023,13 @@ as its only argument. For example, the following 
snippet will mirror
 only those files in @code{~/blog/} which are smaller than 5MB:
 
 @lisp
-(hyperdrive-mirror "~/blog/" (hyperdrive-by-slot 'petname "foo") "/blog/"
-                   :filter (lambda (file) (> (* 5 1024 1024)
-                                              (file-attribute-size
-                                               (file-attributes file)))))
+(hyperdrive-mirror
+ "~/blog/"
+ (hyperdrive-by-slot 'petname "foo")
+ "/blog/"
+ :filter (lambda (file) (> (* 5 1024 1024)
+                      (file-attribute-size
+                       (file-attributes file)))))
 @end lisp
 
 @node Miscellaneous features



reply via email to

[Prev in Thread] Current Thread [Next in Thread]