From mboxrd@z Thu Jan  1 00:00:00 1970
From: Bastien <bastien.guerry@wikimedia.fr>
Subject: Re: Docstrings: Use of `C-u'
Date: Mon, 16 Aug 2010 20:54:07 +0200
Message-ID: <87sk2e4cds.fsf@gnu.org>
References: <0vhbizzap7.fsf@gmail.com> <87ocd71jz6.fsf@gmx.net>
	<87bp978cz8.fsf@mean.albasani.net> <87tymwreu6.fsf@mean.albasani.net>
Mime-Version: 1.0
Content-Type: text/plain; charset=us-ascii
Return-path: <emacs-orgmode-bounces+geo-emacs-orgmode=m.gmane.org@gnu.org>
Received: from [140.186.70.92] (port=35041 helo=eggs.gnu.org)
	by lists.gnu.org with esmtp (Exim 4.43) id 1Ol4p0-0000ZH-BH
	for emacs-orgmode@gnu.org; Mon, 16 Aug 2010 14:54:11 -0400
Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.69)
	(envelope-from <bastienguerry@googlemail.com>) id 1Ol4oz-0002dm-9V
	for emacs-orgmode@gnu.org; Mon, 16 Aug 2010 14:54:10 -0400
Received: from mail-wy0-f169.google.com ([74.125.82.169]:39317)
	by eggs.gnu.org with esmtp (Exim 4.69)
	(envelope-from <bastienguerry@googlemail.com>) id 1Ol4oz-0002da-1e
	for emacs-orgmode@gnu.org; Mon, 16 Aug 2010 14:54:09 -0400
Received: by wyg36 with SMTP id 36so6642509wyg.0
	for <emacs-orgmode@gnu.org>; Mon, 16 Aug 2010 11:54:08 -0700 (PDT)
In-Reply-To: <87tymwreu6.fsf@mean.albasani.net> (Memnon Anon's message of
	"Sun, 15 Aug 2010 01:41:21 +0200")
List-Id: "General discussions about Org-mode." <emacs-orgmode.gnu.org>
List-Unsubscribe: <http://lists.gnu.org/mailman/listinfo/emacs-orgmode>,
	<mailto:emacs-orgmode-request@gnu.org?subject=unsubscribe>
List-Archive: <http://lists.gnu.org/archive/html/emacs-orgmode>
List-Post: <mailto:emacs-orgmode@gnu.org>
List-Help: <mailto:emacs-orgmode-request@gnu.org?subject=help>
List-Subscribe: <http://lists.gnu.org/mailman/listinfo/emacs-orgmode>,
	<mailto:emacs-orgmode-request@gnu.org?subject=subscribe>
Sender: emacs-orgmode-bounces+geo-emacs-orgmode=m.gmane.org@gnu.org
Errors-To: emacs-orgmode-bounces+geo-emacs-orgmode=m.gmane.org@gnu.org
To: Memnon Anon <gegendosenfleisch@googlemail.com>
Cc: Markus Heller <hellerm2@gmail.com>, emacs-orgmode@gnu.org

Memnon Anon <gegendosenfleisch@googlemail.com> writes:

> ,----[ org-agenda.el ]
> | (defun org-agenda-clock-out (&optional arg)
> |   "Stop the currently running clock."
> |   (interactive "P")
> |   (unless (marker-buffer org-clock-marker)
> |     (error "No running clock"))
> |   (let ((marker (make-marker)) newhead)
> |     (org-with-remote-undo (marker-buffer org-clock-marker)
> |       (with-current-buffer (marker-buffer org-clock-marker)
> | 	(save-excursion
> | 	  (save-restriction
> | 	    (widen)
> | 	    (goto-char org-clock-marker)
> | 	    (org-back-to-heading t)
> | 	    (move-marker marker (point))
> | 	    (org-clock-out)
> | 	    (setq newhead (org-get-heading))))))
> |     (org-agenda-change-all-lines newhead marker)
> |     (move-marker marker nil)))
> `----
>
> It takes an (optional) arg, but is it used anywhere?!

Nope...

> If there is no arg interpreted anywhere, why is it there?

Looks like a mistake - I committed a fix to remove this arg.

-- 
 Bastien