Tom Willemsen
210460d177
Remove the blog link. Generate a list of at most 10 post titles and link to the full index when done. Remove the "Emacs" sub-heading under "Projects", remove the "Dotfiles" heading. Add a "Profiles" heading which lists some other places I can be found.
74 lines
3.3 KiB
Org Mode
74 lines
3.3 KiB
Org Mode
#+TITLE: oni org
|
|
#+OPTIONS: toc:nil num:nil author:nil email:nil creator:nil
|
|
#+LANGUAGE: en
|
|
#+STARTUP: showall
|
|
|
|
#+begin_html
|
|
<script src="/keyjs.js" type="text/javascript"></script>
|
|
<script type="text/javascript">
|
|
keyjs_initialize({ "u": [ "keyjs_goto", "http://ryuslash.org" ],
|
|
"h": [ "keyjs_goto", "http://ryuslash.org" ] });
|
|
</script>
|
|
#+end_html
|
|
|
|
- [[http://ryuslash.org/][Front page]]
|
|
- [[http://code.ryuslash.org][Code]]
|
|
|
|
* About
|
|
I'm a programming, free software and GNU/Linux enthusiast. I'm also
|
|
a programmer professionally, so that works out well.
|
|
|
|
I was born in the Netherlands, live in Belgium and work for a dutch
|
|
company. I have been using GNU/Linux since 2008, having settled on
|
|
[[http://www.archlinux.org][Archlinux]] after trying [[http://www.ubuntu.com][Ubuntu]], [[http://fedoraproject.org][Fedora]] and [[http://zenwalk.org][Zenwalk]]. I have been using
|
|
[[emacs][GNU Emacs]] since not long after switching over to GNU/Linux.
|
|
|
|
* Posts
|
|
#+begin_src emacs-lisp :exports results :results list
|
|
(defun file-to-data (file)
|
|
(unless (or (string= file ".") (string= file "..") (string= file "index.org"))
|
|
(let (title date)
|
|
(with-temp-buffer
|
|
(insert-file (concat "/home/slash/var/src/orgweb/site/blog/" file))
|
|
(goto-char (point-min))
|
|
(re-search-forward "^#\\+TITLE: \\(.*\\)$")
|
|
(setq title (buffer-substring-no-properties
|
|
(match-beginning 1) (match-end 1)))
|
|
(goto-char (point-min))
|
|
(re-search-forward "^#\\+DATE: \\(.*\\)$")
|
|
(setq date (buffer-substring-no-properties
|
|
(match-beginning 1) (match-end 1))))
|
|
(list date (concat "[[file:blog/" file "][" title "]]")))))
|
|
|
|
(let ((posts (mapcar #'cadr
|
|
(sort
|
|
(delete nil
|
|
(mapcar
|
|
#'file-to-data
|
|
(directory-files
|
|
"/home/slash/var/src/orgweb/site/blog")))
|
|
(lambda (el1 el2) (not (string-lessp (car el1)
|
|
(car el2))))))))
|
|
(when (> (length posts) 10)
|
|
(setcdr (nthcdr 9 posts) '("[[file:blog/index.org][More...]]")))
|
|
posts)
|
|
#+end_src
|
|
|
|
* Projects
|
|
- [[file:projects/eye-on-manga.org][eye-on-manga]] :: A manga collection manager for my N900 phone.
|
|
- [[file:projects/gitto.org][gitto]] :: A utility for keeping track of my git repositories'
|
|
status.
|
|
- [[file:projects/ryuslash.org][ryuslash.org]] :: My front page.
|
|
- [[file:projects/dispass.el.org][dispass.el]] :: A wrapper for [[http://dispass.babab.nl][DisPass]].
|
|
- [[file:projects/git-auto-commit-mode.org][git-auto-commit-mode]] :: A minor mode for automatically committing
|
|
changes to a file.
|
|
- [[file:projects/org-blog.org][org-blog]] :: A continuation of David O'Toole's ~org-blog~ module.
|
|
- [[file:projects/tron-theme.org][tron-theme]] :: A theme inspired by the Tron: Legacy movie.
|
|
|
|
* Profiles
|
|
- [[https://diasp.org/u/ryuslash][Diasp*]]
|
|
- [[http://gitorious.org/%7Eryuslash][Gitorious]]
|
|
- [[http://identi.ca/ryuslash][identi.ca]]
|
|
- [[http://www.emacswiki.org][EmacsWiki]]
|
|
- [[http://github.com/ryuslash][github]]
|
|
- [[http://www.goodreads.com/ryuslash][goodreads]]
|