Конвертация длинных ссылок в короткие

Отличный пост) Смотрю Emacs с разных сторон, забавная штука которой много лет, но что на столько она расширяемая я себе не представлял.)

В twit.el есть свой сокращатель:

(defun compress-url (url)
  "Compress a URL using is.gd."
  (let* ((returned-request
           (car (twit-parse-xml
                 (concat "http://is.gd/api.php?longurl=" url) "GET")))
          (url-idx (string-match "http://" returned-request 160))
          (compressed-url
           (if url-idx
               (substring returned-request url-idx -1)
               "is.gd is down :(")))
       compressed-url))

Принимает url в качестве аргумента

Удивление вот почему — я слышал про lisp, смотрел как на нем пишут, но сам не пробовал. Когда пришел ко мне первый мак я поверхностно все изучил. А сейчас все более глубже изучаю) И как коснулся текстового редактора — а их такое множетво и комбайном среди них Emacs стоит. Да еще и видеокурс поглядел — фантастика, почему раньше не пробовал не знаю)) Спасибо, отличная среда и ваш пост)

На самом деле я когда-то пытался запустить и честно найти документацию по нему — в то время ничего не смог найти( Слышал, что в AutoCAD используется) Использую несколько редакторов под *nix — наипростейший nano (приглянулся из-за простоты), vim и emacs. Правда с первыми 2 быстро подружился, а вот с комбайном сложнее)) Но в последние несколько недель все чаще стараюсь использовать) Курсовые в свое время я писал на VB еще первом под DOS) Вполне успшно сдавались, а потом научился на С — вот до некоторого момента другого ничего не пробовал, а сейчас у меня на повесте Ruby и RoR).