diff --git a/ChangeLog b/ChangeLog
index aeb4afba5..16f49d2ea 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,5 +1,10 @@
 2009-01-21  Badlop  <badlop@process-one.net>
 
+	* doc/api/process-one.css: Add some style to HTML elements
+
+	* src/ejabberd_listener.erl: Fix EDoc errors
+	* src/web/ejabberd_web_admin.erl: Likewise
+
 	* src/ejabberd_hooks.erl: Explanation in EDoc of some functions
 
 2009-01-20  Badlop  <badlop@process-one.net>
diff --git a/doc/api/process-one.css b/doc/api/process-one.css
index 793d717aa..5cd371e10 100644
--- a/doc/api/process-one.css
+++ b/doc/api/process-one.css
@@ -71,10 +71,22 @@ pre, tt, code {
 }
 
 pre {
-  margin-left: 1em;
+  margin:1ex 2ex;
+  border:1px dashed lightgrey;
+  background-color:#f9f9f9;
+  padding:0.5ex;
 }
 
 pre em {
   font-style: normal;
   font-weight: bold;
 }
+
+dt {
+  margin:0ex 2ex;
+  font-weight:bold;
+}
+
+dd {
+  margin:0ex 0ex 1ex 4ex;
+}
diff --git a/src/ejabberd_listener.erl b/src/ejabberd_listener.erl
index cd5ca0898..03948120f 100644
--- a/src/ejabberd_listener.erl
+++ b/src/ejabberd_listener.erl
@@ -287,12 +287,13 @@ add_listener(PortIP, Module, Opts) ->
 	    {error, Error}
     end.
   
-%% @spec (PortIP) -> ok
+%% @spec (PortIP, Module) -> ok
 %% where
 %%      PortIP = {Port, IPT | IPS}
 %%      Port = integer()
 %%      IPT = tuple()
 %%      IPS = string()
+%%      Module = atom()
 delete_listener(PortIP, Module) ->
     Ports = case ejabberd_config:get_local_option(listen) of
 		undefined ->
diff --git a/src/web/ejabberd_web_admin.erl b/src/web/ejabberd_web_admin.erl
index 832983914..b93331a64 100644
--- a/src/web/ejabberd_web_admin.erl
+++ b/src/web/ejabberd_web_admin.erl
@@ -1063,12 +1063,12 @@ term_to_string(T) ->
     {ok, StringLine, _} = regexp:gsub(StringParagraph, "\\n ", ""),
     StringLine.
 
-%% @spec (T::any()) -> {NumLines::integer(), Paragraph::string()}
+%% @spec (T::any(), Cols::integer()) -> {NumLines::integer(), Paragraph::string()}
 term_to_paragraph(T, Cols) ->
-	Paragraph = erl_prettypr:format(erl_syntax:abstract(T), [{paper, Cols}]),
-	{ok, FieldList} = regexp:split(Paragraph, "\n"),
-	NumLines = length(FieldList),
-	{NumLines, Paragraph}.
+    Paragraph = erl_prettypr:format(erl_syntax:abstract(T), [{paper, Cols}]),
+    {ok, FieldList} = regexp:split(Paragraph, "\n"),
+    NumLines = length(FieldList),
+    {NumLines, Paragraph}.
 
 term_to_id(T) ->
     jlib:encode_base64(binary_to_list(term_to_binary(T))).