Browse Source

Code cleanup.

Bastien Guerry 16 years ago
parent
commit
402448cb4c
1 changed files with 1 additions and 5 deletions
  1. 1 5
      lisp/org-clock.el

+ 1 - 5
lisp/org-clock.el

@@ -476,9 +476,7 @@ Use alsa's aplay tool if available."
 (defun org-program-exists (program-name)
 (defun org-program-exists (program-name)
   "Checks whenever we can locate program and launch it."
   "Checks whenever we can locate program and launch it."
   (if (eq system-type 'gnu/linux)
   (if (eq system-type 'gnu/linux)
-      (= 0 (call-process "which" nil nil nil program-name))
-    ))
-
+      (= 0 (call-process "which" nil nil nil program-name))))
 
 
 (defvar org-clock-mode-line-entry nil
 (defvar org-clock-mode-line-entry nil
   "Information for the modeline about the running clock.")
   "Information for the modeline about the running clock.")
@@ -609,7 +607,6 @@ the clocking selection, associated with the letter `d'."
     (org-back-to-heading t)
     (org-back-to-heading t)
     (move-marker org-clock-default-task (point))))
     (move-marker org-clock-default-task (point))))
 
 
-
 (defvar msg-extra)
 (defvar msg-extra)
 (defun org-clock-get-sum-start ()
 (defun org-clock-get-sum-start ()
   "Return the time from which clock times should be counted.
   "Return the time from which clock times should be counted.
@@ -1540,7 +1537,6 @@ The details of what will be saved are regulated by the variable
   (add-hook 'org-mode-hook 'org-clock-load)
   (add-hook 'org-mode-hook 'org-clock-load)
   (add-hook 'kill-emacs-hook 'org-clock-save))
   (add-hook 'kill-emacs-hook 'org-clock-save))
 
 
-
 ;; Suggested bindings
 ;; Suggested bindings
 (org-defkey org-mode-map "\C-c\C-x\C-e" 'org-clock-modify-effort-estimate)
 (org-defkey org-mode-map "\C-c\C-x\C-e" 'org-clock-modify-effort-estimate)