Fedora 18でxmonadとgnome-panelを使用する

私は最近fedora 18を使用しており、xmonadをgnome-panelで動作させようとしています。私のUbuntuとKaliのインストールではうまくいきますが、FedoraではGNOMEパネルが正しく表示されません。 GNOMEパネルがこのように現れる理由とその機能をどのように機能させるかについての支援をいただきありがとうございます。これはスクリーンショットです。右側の2つの黒いパネルを確認してください。私はそれらがgnomeパネルの上下のメニューになっていることを発見しましたが、まだfedoraとxmonadでは動作していないようです。

xmonadデスクトップファイルがあります

#/usr/share/applications/xmonad.desktop
[Desktop Entry]
Type=Application
Encoding=UTF-8
Name=Xmonad
Exec=xmonad-start
NoDisplay=true
X-GNOME-WMName=Xmonad
X-GNOME-Autostart-Phase=WindowManager
X-GNOME-Provides=windowmanager
X-GNOME-Autostart-Notify=false

GNOMEセッションファイルがあります

#/usr/share/gnome-session/sessions/xmonad.session
[GNOME Session]
Name=Xmonad/GNOME
RequiredComponents=gnome-settings-daemon;gnome-panel;
RequiredProviders=windowmanager;notifications;
DefaultProvider-windowmanager=xmonad
DefaultProvider-notifications=notification-daemon

xsessionsファイルがあります

#/usr/share/xsessions/xmonad.desktop
[Desktop Entry]
Encoding=UTF-8
Name=XMonad Gnome
Comment=Lightweight tiling window manager
TryExec=/usr/bin/gnome-session
Exec=gnome-session --session=xmonad
#Icon=xmonad.png
Type=XSession

これは他のシステムではうまく機能しますが、Fedoraではxmonad gnome-panelにログインすると、上部と下部のgnome-panelsと見なされる2つのパネルが開くように見えますが、空です。さらに、それらをオフにしたり、他の何もすることはできません。

xmonad.hsファイルの上部からGnomeConfigモジュールとManageDocksモジュールをインポートしました。

import XMonad.Config.Gnome
import XMonad.Hooks.ManageDocks

私も私の設定にgnome-panelignoreを追加しましたが、それが何をしているのかわかりません。 （私はそれを追加した後、他のシステムが機能するようになったことを知っています。）

myManageHook = composeAll
[ manageHook gnomeConfig
, className =? "File Operation Progress"  --> doFloat
, className =? "google-chrome"  --> doShift "4:chrome"
, resource  =? "desktop_window" --> doIgnore
, resource  =? "kdesktop"       --> doIgnore
, resource  =? "gnome-panel"    --> doIgnore ] 

デフォルト値を上から取得したGnomeConfigに変更しました。

main = xmonad defaults

defaults = gnomeConfig {

  -- simple stuff
    terminal           = myTerminal,
    focusFollowsMouse  = myFocusFollowsMouse,
    borderWidth        = myBorderWidth,
    modMask            = myModMask,
    -- numlockMask deprecated in 0.9.1
    -- numlockMask        = myNumlockMask,
    workspaces         = myWorkspaces,
    normalBorderColor  = myNormalBorderColor,
    focusedBorderColor = myFocusedBorderColor,

  -- key bindings
    keys               = myKeys,
    mouseBindings      = myMouseBindings,

  -- hooks, layouts
    layoutHook         = myLayout,
    manageHook         = myManageHook,
    handleEventHook    = myEventHook,
    logHook            = myLogHook,
    startupHook        = myStartupHook
}