XMonad 0.13

Haron_Prime	# 4 года, 12 месяцев назад
Темы: 28 Сообщения: 2109 Участник с: 08 июня 2014	где-то со скобками ошибка... похоже, в строке 3 Gnome 2 >> Unity >> KDE 4 >> Openbox >> Awesome >> Xmonad GitHub , BitBuket

Haron_Prime	# 4 года, 12 месяцев назад
Темы: 28 Сообщения: 2109 Участник с: 08 июня 2014	ну да... это мой косяк - вторую закрывающую скобку упустил `import XMonad.Layout.LayoutCombinators ((\|\|\|))` Gnome 2 >> Unity >> KDE 4 >> Openbox >> Awesome >> Xmonad GitHub , BitBuket

Seggoy	# 4 года, 12 месяцев назад
Темы: 0 Сообщения: 33 Участник с: 06 сентября 2017	Haron_Prime ну да... это мой косяк - вторую закрывающую скобку упустил `import XMonad.Layout.LayoutCombinators ((\|\|\|))` Только давайте договоримся, что это последняя попытка на сегодня =)) Черный экран, xmobar есть, работает переключение воркспейсов, остальные хоткеи не работают. Xmobar вроде даже не обновляется, потому что пока я там тыкал, прошло минуты 2, а время в баре не изменилось, хотя не уверен точно.

Seggoy

# 4 года, 12 месяцев назад

Темы: 0

Сообщения: 33

Участник с: 06 сентября 2017

Haron_Prime
ну да... это мой косяк - вторую закрывающую скобку упустил
import XMonad.Layout.LayoutCombinators ((|||))

Только давайте договоримся, что это последняя попытка на сегодня =))

Черный экран, xmobar есть, работает переключение воркспейсов, остальные хоткеи не работают. Xmobar вроде даже не обновляется, потому что пока я там тыкал, прошло минуты 2, а время в баре не изменилось, хотя не уверен точно.

ChubaDuba	# 4 года, 12 месяцев назад (отредактировано 4 года, 12 месяцев назад)
Темы: 2 Сообщения: 27 Участник с: 01 октября 2016	У меня работает вот так: : XMonad.Hooks.DynamicLog import XMonad.Layout.Grid import XMonad.Layout.IM import XMonad.Hooks.ManageDocks import XMonad.Layout.Minimize import XMonad.Layout.NoBorders import XMonad.Layout.ResizableTile import XMonad.Util.EZConfig import Data.Ratio ((%)) : : myWorkspaces = ["web","term",.....] myLayouts = minimize (avoidStruts ( ResizableTall 1 (3/100) (1/2) []) \|\|\| Mirror tiled \|\|\| noBorders Full \|\|\| withIM (1%7) (ClassName "Tkabber") Grid) where tiled = Tall nmaster delta ratio nmaster = 1 ratio = 1/2 delta = 3/100 myManageHook = composeAll [ ....... , ....... , ....... ] : : main = xmonad =<< statusBar myBar myPP toggleStrutsKey myConfig myBar = "xmobar" myPP = xmobarPP { ppCurrent = xmobarColor "#F0E0AF" "" , ..... , ..... } toggleStrutsKey XConfig {XMonad.modMask = modMask} = (modMask, xK_b) myConfig = defaultConfig { modMask = mod4Mask , terminal = "urxvt" , ..... , ..... , layoutHook = smartBorders myLayouts , manageHook = myManageHook <+> manageDocks , workspaces = myWorkspaces } `additionalKeys` myKeys myKeys = [ ((mod4Mask, xK_a), sendMessage MirrorShrink) , ((mod4Mask .\|. shiftMask, xK_a), spawn "urxvt -e mocp") , ...... ] : : P.S. xmonad, xmonad-contrib и xmobar устанавливал из cabal.

ChubaDuba

# 4 года, 12 месяцев назад (отредактировано 4 года, 12 месяцев назад)

Темы: 2

Сообщения: 27

Участник с: 01 октября 2016

У меня работает вот так:


:
XMonad.Hooks.DynamicLog
import XMonad.Layout.Grid
import XMonad.Layout.IM
import XMonad.Hooks.ManageDocks
import XMonad.Layout.Minimize
import XMonad.Layout.NoBorders
import XMonad.Layout.ResizableTile
import XMonad.Util.EZConfig
import Data.Ratio ((%))
:
:
myWorkspaces = ["web","term",.....]

myLayouts = minimize (avoidStruts ( ResizableTall 1 (3/100) (1/2) [])
                                         ||| Mirror tiled
                                         ||| noBorders Full
                                         ||| withIM (1%7) (ClassName "Tkabber") Grid)
      where
                    tiled   = Tall nmaster delta ratio
                    nmaster = 1
                    ratio   = 1/2
                    delta   = 3/100

myManageHook =  composeAll
                                     [ .......
                                     , .......
                                     , .......
                                     ]
:
:
main = xmonad =<< statusBar myBar myPP toggleStrutsKey myConfig
myBar = "xmobar"

myPP = xmobarPP
            { ppCurrent = xmobarColor "#F0E0AF" ""
            , .....
            , .....
            }

toggleStrutsKey XConfig {XMonad.modMask = modMask} = (modMask, xK_b)

myConfig = defaultConfig
              { modMask            = mod4Mask
              , terminal               = "urxvt"
              , .....
              , .....
              , layoutHook         = smartBorders myLayouts
              , manageHook      = myManageHook <+> manageDocks
              , workspaces         = myWorkspaces
              } `additionalKeys` myKeys

myKeys = [
                      ((mod4Mask,                                    xK_a), sendMessage MirrorShrink)
                    , ((mod4Mask .|. shiftMask,            xK_a), spawn "urxvt -e mocp")
                    , ......
                   ]
:
:

P.S. xmonad, xmonad-contrib и xmobar устанавливал из cabal.

Haron_Prime	# 4 года, 12 месяцев назад (отредактировано 4 года, 12 месяцев назад)
Темы: 28 Сообщения: 2109 Участник с: 08 июня 2014	Изначально всё пошло неправильно. Первое, что нужно было сделать - скопировать дефолтный конфиг в хомяк и собрать бинарник `cp /usr/share/xmonad/man/xmonad.hs ~/.xmonad/xmonad.hs xmonad --recompile && xmonad --restart` А уж после этого накручивать на него свои фишки и хотелки. Что-то протупил я вчера.... Gnome 2 >> Unity >> KDE 4 >> Openbox >> Awesome >> Xmonad GitHub , BitBuket

Haron_Prime

# 4 года, 12 месяцев назад (отредактировано 4 года, 12 месяцев назад)

Темы: 28

Сообщения: 2109

Участник с: 08 июня 2014

Изначально всё пошло неправильно.
Первое, что нужно было сделать - скопировать дефолтный конфиг в хомяк и собрать бинарник

cp /usr/share/xmonad/man/xmonad.hs ~/.xmonad/xmonad.hs
xmonad --recompile &&
xmonad --restart

А уж после этого накручивать на него свои фишки и хотелки.
Что-то протупил я вчера....

Gnome 2 >> Unity >> KDE 4 >> Openbox >> Awesome >> Xmonad
GitHub , BitBuket

A.T.W.A.	# 4 года, 12 месяцев назад
Темы: 14 Сообщения: 658 Участник с: 21 марта 2011	Haron_Prime Все вхождения типа defaultConfig следует заменить на def - так стало в версии 0.13 А не в 0.12? https://t.me/atvva

Seggoy	# 4 года, 12 месяцев назад (отредактировано 4 года, 12 месяцев назад)
Темы: 0 Сообщения: 33 Участник с: 06 сентября 2017	Haron_Prime Изначально всё пошло неправильно. Первое, что нужно было сделать - скопировать дефолтный конфиг в хомяк и собрать бинарник `cp /usr/share/xmonad/man/xmonad.hs /.xmonad/xmonad.hs xmonad --recompile && xmonad --restart` А уж после этого накручивать на него свои фишки и хотелки. Что-то протупил я вчера.... Обязательно сегодня попробую заново =) Добью я этот xmonad как пить дать

Seggoy

# 4 года, 12 месяцев назад (отредактировано 4 года, 12 месяцев назад)

Темы: 0

Сообщения: 33

Участник с: 06 сентября 2017

Haron_Prime
Изначально всё пошло неправильно.
Первое, что нужно было сделать - скопировать дефолтный конфиг в хомяк и собрать бинарник
cp /usr/share/xmonad/man/xmonad.hs /.xmonad/xmonad.hs
xmonad --recompile &&
xmonad --restart
А уж после этого накручивать на него свои фишки и хотелки.
Что-то протупил я вчера....

Обязательно сегодня попробую заново =) Добью я этот xmonad как пить дать

Aivar	# 4 года, 12 месяцев назад
Темы: 4 Сообщения: 6897 Участник с: 17 февраля 2011	Seggoy заного Cюда. Правильно: за ногу.

Seggoy	# 4 года, 12 месяцев назад
Темы: 0 Сообщения: 33 Участник с: 06 сентября 2017	Aivar Seggoy заного Cюда. Правильно: за ногу. Мне можно, у меня русский не родной

Aivar	# 4 года, 12 месяцев назад
Темы: 4 Сообщения: 6897 Участник с: 17 февраля 2011	Не оправдание. У меня тоже. У многих...