manatee-ircclient 0.0.2 → 0.0.3

raw patch · 5 files changed

+39/−7 lines, 5 filesdep ~manatee-coresetup-changed

Dependency ranges changed: manatee-core

Files

• Main.hs +2/−1
• Manatee/Extension/IrcClient/IrcBuffer.hs +3/−3
• Manatee/Extension/IrcClient/IrcView.hs +1/−1
• Setup.hs +22/−0
• manatee-ircclient.cabal +11/−2

@@ -28,4 +28,5 @@ -- | Irc client render process. main :: IO () main = -    startupRender (\ pagePath client pageId -> PageBufferWrap <$> ircBufferNew pagePath client pageId)+    startupRender (\ pagePath options client pageId -> +                       PageBufferWrap <$> ircBufferNew pagePath options client pageId)

@@ -96,8 +96,8 @@                        deriving (Show, Eq, Ord)  -- | Create buffer new.-ircBufferNew :: String -> Client -> PageId -> IO IrcBuffer-ircBufferNew info client pageId = do+ircBufferNew :: String -> [String] -> Client -> PageId -> IO IrcBuffer+ircBufferNew info _ client pageId = do   -- Get server port channel information.   let (mynick, server, port, channel) = ircParseInfo info   putStrLn ("Buffer create (server, port, channel) : " ++ show (server, port, channel))@@ -139,7 +139,7 @@           when (button == LeftButton && click == SingleClick) $              textBufferGetTagTextWithIter sourceBuffer iter urlColorTag                >?>= \ url ->-                mkDaemonSignal client NewTab (NewTabArgs "PageBrowser" url)+                mkDaemonSignal client NewTab (NewTabArgs "PageBrowser" url [])         _ -> return ()    -- Apply text tag.

@@ -468,7 +468,7 @@ ircViewOpenUrl view@(IrcView {ircViewBuffer = buffer}) =    textBufferGetTagText (ircBufferBuffer buffer) (ircBufferUrlColorTag buffer)      >?>= \ url ->        -         mkDaemonSignal (pageViewClient view) NewTab (NewTabArgs "PageBrowser" url)+         mkDaemonSignal (pageViewClient view) NewTab (NewTabArgs "PageBrowser" url [])  -- | Translate message around pointer. ircViewTranslateMessage :: IrcView -> IO ()

@@ -1,3 +1,21 @@+-- Author:     Andy Stewart <lazycat.manatee@gmail.com>+-- Maintainer: Andy Stewart <lazycat.manatee@gmail.com>+-- +-- Copyright (C) 2010 Andy Stewart, all rights reserved.+-- +-- This program is free software: you can redistribute it and/or modify+-- it under the terms of the GNU General Public License as published by+-- the Free Software Foundation, either version 3 of the License, or+-- any later version.+-- +-- This program is distributed in the hope that it will be useful,+-- but WITHOUT ANY WARRANTY; without even the implied warranty of+-- MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the+-- GNU General Public License for more details.+-- +-- You should have received a copy of the GNU General Public License+-- along with this program.  If not, see <http://www.gnu.org/licenses/>.+ import Distribution.Simple import Manatee.Core.Config import Manatee.Core.Types@@ -15,4 +33,8 @@              (PageModeRule modeRule) <- readConfig pageModeRulePath (PageModeRule M.empty)              writeConfig pageModeRulePath (PageModeRule                                                  (M.insert "PageIrc" (Left $ pageModeName ircMode) modeRule))+             -- Update ExtensionGloalKeymap.+             (ExtensionGloalKeymap keymap) <- readConfig extensionGlobalKeymapPath (ExtensionGloalKeymap M.empty)+             writeConfig extensionGlobalKeymapPath (ExtensionGloalKeymap+                                                    (M.insert "F6" ("PageIrc", "irc://", []) keymap))        }

@@ -1,11 +1,20 @@ name:			manatee-ircclient-version:		0.0.2+version:		0.0.3 Cabal-Version:	>= 1.6 license:		GPL-3 license-file:	LICENSE copyright:		(c) 2009 ~ 2010 Andy Stewart synopsis:		IRC client extension for Manatee. description:    manatee-ircclient is IRC client extension for Manatee (Haskell/Gtk+ Integrated Live Environment)+ .+ Manual look <http://haskell.org/haskellwiki/Manatee>+ .+ Screenshot at <http://goo.gl/MkVw>+ .+ IRC channel: + .+ irc.freenode.net 6667 <##manatee>+ . author:			Andy Stewart maintainer:		Andy Stewart <lazycat.manatee@gmail.com> stability:		provisional@@ -36,7 +45,7 @@   location:     http://patch-tag.com/r/AndyStewart/manatee-ircclient    Library-     build-depends: base >= 4 && < 5, manatee-core >= 0.0.2, dbus-client >= 0.3 && < 0.4, stm >= 2.1.2.0,+     build-depends: base >= 4 && < 5, manatee-core >= 0.0.3, dbus-client >= 0.3 && < 0.4, stm >= 2.1.2.0,                     containers >= 0.3.0.0, gtk-serialized-event >= 0.12.0, gtk >= 0.12.0,                      text >= 0.7.1.0, bytestring >= 0.9.1.5,                     dbus-core, template-haskell, gtksourceview2 >= 0.12.0, unix >= 2.4.0.0,