clean up

settings/toolbar-settings.el

@@ -39,9 +39,7 @@
             ("etc/images/next-node" . "document-export")
             ("etc/images/refresh" . ("document-revert" "refresh" "gtk-convert"))
             ("etc/images/exit" . ("n:application-exit" "n:system-shutdown" "exit" "gtk-quit"))
-            ))
-    )
-  )
+            ))))
 
 (use-package dialog
   :defer 2
@@ -59,9 +57,7 @@
       (message "ja")
       (previous-buffer)
       (my-org-export-html)
-      (next-buffer)
-      )
-    )
+      (next-buffer)))
   (setq my-org-export-dialog-html-var 'my-org-export-dialog-html-fun)
   (defun my-org-export-dialog-pdf-fun ()
     "Ask."
@@ -70,9 +66,7 @@
       (message "ja")
       (previous-buffer)
       (my-org-export-pdf)
-      (next-buffer)
-      )
-    )
+      (next-buffer)))
   (setq my-org-export-dialog-pdf-var 'my-org-export-dialog-pdf-fun)
 
   (dialog-define my-org-export-dialog
@@ -85,8 +79,7 @@
              ;;[text 5 1 "PDF (LaTeX)"]
              [button-quit 5 1 :tag "PDF (LaTeX)" :notify my-org-export-dialog-pdf-var]
              [button-quit 7 1]
-             [text 8 1 ""]
-             )
+             [text 8 1 ""])
     "This is my-org-export dialog.")
   ;; (my-org-export-dialog)
   )
@@ -94,12 +87,11 @@
 
 (defun my-org-export-ivy ()
   ""
-  (setq my-org-export-list '(
-                             ("HTML" . my-org-export-html)
-                             ("HTML async" . my-org-export-html-async)
-                             ("PDF (LaTeX)" . my-org-export-pdf)
-                             ("PDF (LaTeX) async" . my-org-export-pdf-async)
-                             ))
+  (setq my-org-export-list
+        '(("HTML" . my-org-export-html)
+          ("HTML async" . my-org-export-html-async)
+          ("PDF (LaTeX)" . my-org-export-pdf)
+          ("PDF (LaTeX) async" . my-org-export-pdf-async)))
   (ivy-read
    "Org export: "
    ;;'("HTML" "PDF (LaTeX)")
@@ -113,19 +105,14 @@
                     ;; get the value from the key value pair and call value (fun)
                     (funcall (cdr x))
                     )
-              "switch"
-              )
-             )
-   )
-  )
+              "switch"))))
 
 (defun my-org-export ()
   ""
   (interactive)
   ;;(my-org-export-dialog)
   ;;(dialog-run 'my-org-export-dialog)
-  (my-org-export-ivy)
-  )
+  (my-org-export-ivy))
 ;;(my-org-export)
 ;;(makunbound 'my-org-export)