From mboxrd@z Thu Jan  1 00:00:00 1970
From: Chris Leyon <cleyon@gmail.com>
Subject: org-toggle-link-style
Date: Wed, 26 Aug 2009 11:04:54 -0400
Message-ID: <5ea706d0908260804m284a6941mc67dba5ce7ff18e8@mail.gmail.com>
Mime-Version: 1.0
Content-Type: text/plain; charset=ISO-8859-1
Content-Transfer-Encoding: 7bit
Return-path: <emacs-orgmode-bounces+geo-emacs-orgmode=m.gmane.org@gnu.org>
Received: from mailman by lists.gnu.org with tmda-scanned (Exim 4.43)
	id 1MgK3d-0000Uf-Hj
	for emacs-orgmode@gnu.org; Wed, 26 Aug 2009 11:05:05 -0400
Received: from exim by lists.gnu.org with spam-scanned (Exim 4.43)
	id 1MgK3X-0000Pv-8e
	for emacs-orgmode@gnu.org; Wed, 26 Aug 2009 11:05:04 -0400
Received: from [199.232.76.173] (port=39802 helo=monty-python.gnu.org)
	by lists.gnu.org with esmtp (Exim 4.43) id 1MgK3W-0000PY-Og
	for emacs-orgmode@gnu.org; Wed, 26 Aug 2009 11:04:58 -0400
Received: from mail-px0-f176.google.com ([209.85.216.176]:40588)
	by monty-python.gnu.org with esmtp (Exim 4.60)
	(envelope-from <cleyon@gmail.com>) id 1MgK3W-0000SO-8k
	for emacs-orgmode@gnu.org; Wed, 26 Aug 2009 11:04:58 -0400
Received: by pxi6 with SMTP id 6so152335pxi.27
	for <emacs-orgmode@gnu.org>; Wed, 26 Aug 2009 08:04:56 -0700 (PDT)
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/pipermail/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: emacs org-mode mailing list <emacs-orgmode@gnu.org>

I wanted this operation on a key (rather than a menu option), so I am
sharing my function in case anyone else finds it useful:

(defun org-toggle-link-style ()
  "Toggle between descriptive and literal link styles."
  (interactive)
  (if (member '(org-link) buffer-invisibility-spec)
      ;; descriptive -> literal
      (progn
        (org-remove-from-invisibility-spec '(org-link))
        (message "Showing literal links"))
    ;; literal -> descriptive
    (org-add-to-invisibility-spec '(org-link))
    (message "Showing descriptive links"))
  (org-restart-font-lock))