Ну, покрасуюсь и я.

toolbar - снести
gutter - снести
только место жрут

Шалом Хайфа :-) А в чем, собсно, работа заключается? В ковырянии в нутрях emacs?

О! Lisp.... ня ^_^

Одобрямс. Сам никак не собирусь лисп сесть поизучать .. :( И обоина у тебя рулезная

to russman: Поддерживаю. Однако для начинающих имаксоводов с тулбарами и гуттерами жизнь кажется немного попроще.

я бы так перевёл "Linux is sexy" - "есть с чем потрахаться" =)

> я бы так перевёл "Linux is sexy" - "есть с чем потрахаться" =)

Вам, линуксойдам, лишь бы с чем/кем трахаться, только не с девушками. :)

Насчёт тулбара: действительно, не пользуюсь; на днях показывал человеку, как иконки на нём менять. Уже прибрался :).

А табы (хоть ими тоже практически не пользуюсь :), но иногда всё же бывает) мне почему-то очень нравятся. Ну, и когда случайно запустишь несколько емаксов, не тот убьёшь в котором уже открыта куча файлов, а тот, в котором один, потому что сразу видно, кто есть кто.

Десктопы - http://www.linuxsoft.cz/wredirect.php?id_download=169 + http://www.linuxsoft.cz/wredirect.php?id_download=120. Но подумываю иногда совсем снести - мег 20 отъедают.

ЗЫ. Никогда не думал, что тут такая очередь на скриншоты :)

Это не работа, это учёба. Соревнование по AI: 3D крестики-нолики.

Привет из Техниона!
А я только начинаю - первый семестр, тоже CS...
Может поделишся опытом жизни под линуксом в технионе.
Как, например, смотреть лекции видео? До того как они upgrade до WMV3 провели всё работало, а теперь :(
Может, ещё что полезного посоветуешь?
Я у себя тоже Xinerama запустил. Теперь firefox ругается:
/usr/lib/firefox-1.0/mozilla-xremote-client: Error: Failed to find a running server.

Пиши на sapiens@t2. Буду рад (не бойся, надоедать не собираюсь).

P.S. Кстати, если не знаешь, по понедельникам в Taub 3 проходят встречи товарищей с Хаифукса (http://www.haifux.org). Частенько интересные вещи рассказывают.

Да сюда просто опасно скриншоты постить :))) Это же надо, там слово "Технион" один раз встречается!!! :)

sapiens@t2: ночью черкну. ff и у меня ругается - через раз :( Всё руки не доходят разобраться. Уже автоматом 'copy link location' -> paste делаю. Лекции, если надо, смотрю с дисков. Они наружу их не дают. Но я попробую узнать.

> P.S. Кстати, если не знаешь, по понедельникам в Taub 3 проходят встречи товарищей с Хаифукса (http://www.haifux.org). Частенько интересные вещи рассказывают.

А Орон Пелед там ещё появляется?

>Вам, линуксойдам, лишь бы с чем/кем трахаться, только не с девушками. :)

ну, мне лично времени на всё хватает =)

расскажи, плс, как настроено окно xemacs'a с файлом hw3.lisp? что используется, как настроено? откуда красивые кнопочки? Ж:-)

Пакет ecb (Emacs Code Browser), немного изменён layout и добавлены часто используемые директории. Попробуй M-x ecb-activate, почти наверняка, у тебя тоже есть.

Кнопочки делал сам: взял иконки (crystal, по-моему) и фон, совместил в gimp'е. Цветовая схема в емаксе - тоже моя.

Потом есть коммандочка edit-toolbar, а дальше всё просто :)

Если есть ещё вопросы - пожалуйста, сейчас я убегаю, а ночью постараюсь ответить.

.xemacs/init.el (или custom.el или что используется) можно где-нть глянуть? и что делает кнопочка `RCL Activate'?

Че такое Технион???

народ, скажите, что такое ТехниОН?

а че slime не пользуешь? в eshelle пускать lisp интерпретатор imo изврат ..

В eshell я проверял некоторые lisp-конструкции. Предпочитаю проверять сомнительные вещи сразу, чтоб потом не пришлось отлаживать. К тому же C-c C-o (flush output) - очень полезная штука!

ACL = Allegro Common Lisp. Соответственно ACL (на скриншоте неважно получилось) активирует allegro common lisp со всеми его вкусностями и интеграциями.

Про slime не знал, спасибо. Но у ACL тоже есть пакет для (x)emacs'а с похожей функциональностью.

Ну, а потом пишется test-suite на перле и всё гоняется себе по make test и никто больше не нужен :)

Технион - Израильский Технологический Институт. Входит в X самых престижных университетов мира (X, в зависимости от источника, колеблется от 3 до 7 :) ).

cat ~/.xemacs/custom.el

(custom-set-variables
 '(ecb-major-modes-activate "\\(Info\\|custom\\)-mode")
 '(paren-mode (quote paren) nil (paren))
 '(version-control t)
 '(undo-high-threshold 300000)
 '(ecb-options-version "2.11")
 '(wwi-auto-install-on-startup-flag t nil (where-was-i-db))
 '(recent-files-permanent-submenu t)
 '(recent-files-commands-submenu t)
 '(enabled-behavior-list (quote (mwheel)))
 '(tab-stop-list (quote (3 6 9 12 15 21 27 30 42 54 57 60 63 66 69 72 78)) t)
 '(ecb-auto-activate t)
 '(tags-build-completion-table t)
 '(tab-width 3)
 '(visible-bell nil)
 '(buffers-tab-max-size 15)
 '(toolbar-visible-p nil)
 '(package-get-require-signed-base-updates nil)
 '(tags-auto-read-changed-tag-files t)
 '(permanent-buffers-mode t nil (permanent-buffers))
 '(ecb-source-path (quote (("/home/fax/prj/test/src" "jrplus - sources") ("/home/fax/prj/test/include" "jrplus - includes") ("/home/fax/prj/test/test" "jrplus - tests"))))
 '(undo-threshold 200000)
 '(indent-tabs-mode nil)
 '(scroll-all-mode nil)
 '(tag-table-alist nil)
 '(font-lock-mode t nil (font-lock)))
(custom-set-faces
 '(default ((t (:background-pixmap "/usr/share/xemacs/background.xpm"))) t)
 '(cperl-nonoverridable-face ((((class color) (background light)) (:foreground "darkgreen"))))
 '(cperl-hash-face ((((class color) (background light)) (:foreground "BlueViolet" :bold t))))
 '(font-lock-type-face ((((class color) (background light)) (:foreground "darkblue" :bold t)))))
(line-number-mode t)
(column-number-mode t)


(defun activate-alisp ()
        (interactive)
        (load "/opt/acl62_trial/xeli/fi-site-init.el"
))

;(load "~/.xemacs/.toolbar")



;=============================================================================
;;                    scroll on  mouse wheel
;;=============================================================================


;; scroll on wheel of mouses
(define-key global-map 'button4
  '(lambda (&rest args)
    (interactive)
    (let ((curwin (selected-window)))
      (select-window (car (mouse-pixel-position)))
      (scroll-down 5)
      (select-window curwin)
)))
(define-key global-map [(shift button4)]
  '(lambda (&rest args)
    (interactive)
    (let ((curwin (selected-window)))
      (select-window (car (mouse-pixel-position)))
      (scroll-down 1)
      (select-window curwin)
)))
(define-key global-map [(control button4)]
  '(lambda (&rest args)
    (interactive)
    (let ((curwin (selected-window)))
      (select-window (car (mouse-pixel-position)))
      (scroll-down)
      (select-window curwin)
)))

(define-key global-map 'button5
  '(lambda (&rest args)
    (interactive)
    (let ((curwin (selected-window)))
      (select-window (car (mouse-pixel-position)))
      (scroll-up 5)
      (select-window curwin)
)))
(define-key global-map [(shift button5)]
  '(lambda (&rest args)
    (interactive)
    (let ((curwin (selected-window)))
      (select-window (car (mouse-pixel-position)))
      (scroll-up 1)
      (select-window curwin)
)))
(define-key global-map [(control button5)]
  '(lambda (&rest args)
    (interactive)
    (let ((curwin (selected-window)))
      (select-window (car (mouse-pixel-position)))
      (scroll-up)
      (select-window curwin)
)))

Попробовал slime. Ну, что я могу сказать.... огромное спасибо :))))

еще вопрос: как справляешься с такой армией буферов? как между ними переключаться, заставить отображаться "закладками", etc...

Между фреймами - Alt-Tab
Между двумя последними буферами C-M-l
Между окнами ECB - C-Tab
Ну, и C-x b никто не отменял.

Закладками (табами?) пользуюсь, в основном, когда с кем-нибудь по телефону болтаю, одной рукой неудобно переключаться.

А как закладки (табы) заставить показываться?

"ман что?", спросило дитя... :)

еще просьба, покажи, плс, шрифтовые настройки.

Что именно интересует?