From 2694299fe15c0553101d2107f6689975d16525dc Mon Sep 17 00:00:00 2001
From: Siri Hansen <siri@erlang.org>
Date: Wed, 20 Nov 2013 10:01:16 +0100
Subject: observer: improve wx version of crashdump_viewer

* bugfixes
* add first test
* remove unused code
---
 lib/observer/src/cdv_html_page.erl | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

(limited to 'lib/observer/src/cdv_html_page.erl')

diff --git a/lib/observer/src/cdv_html_page.erl b/lib/observer/src/cdv_html_page.erl
index d77238c6cf..0208d1d67a 100644
--- a/lib/observer/src/cdv_html_page.erl
+++ b/lib/observer/src/cdv_html_page.erl
@@ -89,11 +89,11 @@ handle_event(#wx{event=#wxHtmlLink{type=command_html_link_clicked,
 			    list_to_integer(Pos)}},
 		expand(Id,cdv_bin_wx,State);
 	    "#OBSBinary?" ++ BinSpec ->
-		[{"offset",Off},{"size",Size},{"pos",Pos}] =
+		[{"key1",Preview},{"key2",Size},{"key3",Hash}] =
 		    httpd:parse_query(BinSpec),
-		Id = {obs, {Tab, {list_to_integer(Off),
+		Id = {obs, {Tab, {list_to_integer(Preview),
 				  list_to_integer(Size),
-				  list_to_integer(Pos)}}},
+				  list_to_integer(Hash)}}},
 		expand(Id,cdv_bin_wx,State);
 	    "#Term?" ++ TermKeys ->
 		[{"key1",Key1},{"key2",Key2},{"key3",Key3}] =
-- 
cgit v1.2.3