emacs-orgmode@gnu.org archives
 help / color / mirror / code / Atom feed
From: Rasmus <rasmus@gmx.us>
To: emacs-orgmode@gnu.org
Subject: Re: Org sources and PDF files on Worg
Date: Fri, 24 May 2013 02:46:10 +0200	[thread overview]
Message-ID: <874ndti4rx.fsf@pank.iue.private> (raw)
In-Reply-To: 87li75h9a3.fsf@bzg.ath.cx

Bastien <bzg@gnu.org> writes:

> Hi Suvayu,
>
> Suvayu Ali <fatkasuvayu+linux@gmail.com> writes:
>
>> I believe you can use git for this.  Try
>>
>>   $ git clean -n -x
>
> I didn't know this git command, neat!
>
> The problem we were discussing is different: it's about deleting
> HTML pages that have been published and that have no corresponding
> .org file anymore -- the way I do this for other projects of mine
> is to delete all HTML files and republish my project, but we don't
> want to take that route here...

Couldn't we just compare input and output?  Or is that not safe
enough?  E.g. in an over-simplistic form obtain dead pages via
something like this:

#+BEGIN_SRC emacs-lisp
(let* ((html '("dir1/my-page1.html" 
	      "dir2/my-page2.html"
	      "dir2/my-page3.html"
	      "dir2/my-page4.html"
	      "dir3/my-page4.html")) 
       (org '("dir1/my-page1.org" 
	     "dir2/my-page2.org"
	     "dir3/my-page4.org"))
       (html-sans-extensions (mapcar 'file-name-sans-extension html))
       (org-sans-extensions (mapcar 'file-name-sans-extension org)))
  (mapcar (lambda (x) (concat x ".html"))
	  (dolist (x org-sans-extensions html-sans-extensions)
           (setq html-sans-extensions (remove x html-sans-extensions)))))
#+END_SRC


-- 
A clever person solves a problem. A wise person avoids it

  parent reply	other threads:[~2013-05-24  0:46 UTC|newest]

Thread overview: 17+ messages / expand[flat|nested]  mbox.gz  Atom feed  top
2013-05-21 18:13 Org sources and PDF files on Worg Viktor Rosenfeld
2013-05-21 21:37 ` Jay Kerns
2013-05-22  7:04   ` Bastien
2013-05-22 13:03     ` Jay Kerns
2013-05-22 15:04   ` Viktor Rosenfeld
2013-05-23  7:51     ` Bastien
2013-05-23  8:02       ` Viktor Rosenfeld
2013-05-23  8:21         ` Bastien
2013-05-23 15:48           ` Suvayu Ali
2013-05-23 17:54             ` Bastien
2013-05-23 18:09               ` Suvayu Ali
2013-05-24  0:46               ` Rasmus [this message]
2013-05-24 17:31                 ` Bastien
2013-05-23 17:06           ` Viktor Rosenfeld
2013-05-23 17:52             ` Bastien
2013-05-23 18:07               ` Viktor Rosenfeld
2013-05-23  7:57     ` Viktor Rosenfeld

Reply instructions:

You may reply publicly to this message via plain-text email
using any one of the following methods:

* Save the following mbox file, import it into your mail client,
  and reply-to-all from there: mbox

  Avoid top-posting and favor interleaved quoting:
  https://en.wikipedia.org/wiki/Posting_style#Interleaved_style

  List information: https://www.orgmode.org/

* Reply using the --to, --cc, and --in-reply-to
  switches of git-send-email(1):

  git send-email \
    --in-reply-to=874ndti4rx.fsf@pank.iue.private \
    --to=rasmus@gmx.us \
    --cc=emacs-orgmode@gnu.org \
    /path/to/YOUR_REPLY

  https://kernel.org/pub/software/scm/git/docs/git-send-email.html

* If your mail client supports setting the In-Reply-To header
  via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line before the message body.
Code repositories for project(s) associated with this public inbox

	https://git.savannah.gnu.org/cgit/emacs/org-mode.git

This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).