{"action":"opened","issue":{"url":"https://api.github.com/repos/npct/pct-shiny/issues/44","labels_url":"https://api.github.com/repos/npct/pct-shiny/issues/44/labels{/name}","comments_url":"https://api.github.com/repos/npct/pct-shiny/issues/44/comments","events_url":"https://api.github.com/repos/npct/pct-shiny/issues/44/events","html_url":"https://github.com/npct/pct-shiny/issues/44","id":77587224,"number":44,"title":"DataDir doesn't change for more than once","user":{"login":"usr110","id":10958628,"avatar_url":"https://avatars.githubusercontent.com/u/10958628?v=3","gravatar_id":"","url":"https://api.github.com/users/usr110","html_url":"https://github.com/usr110","followers_url":"https://api.github.com/users/usr110/followers","following_url":"https://api.github.com/users/usr110/following{/other_user}","gists_url":"https://api.github.com/users/usr110/gists{/gist_id}","starred_url":"https://api.github.com/users/usr110/starred{/owner}{/repo}","subscriptions_url":"https://api.github.com/users/usr110/subscriptions","organizations_url":"https://api.github.com/users/usr110/orgs","repos_url":"https://api.github.com/users/usr110/repos","events_url":"https://api.github.com/users/usr110/events{/privacy}","received_events_url":"https://api.github.com/users/usr110/received_events","type":"User","site_admin":false},"labels":[],"state":"open","locked":false,"assignee":null,"milestone":null,"comments":0,"created_at":"2015-05-18T09:48:59Z","updated_at":"2015-05-18T09:48:59Z","closed_at":null,"body":"I am not sure you guys are receiving this error or not. Once you start the application (say from the master folder), it shows you Manchester's map. Once you navigate to some other LA (say Sheffield), and its map gets loaded, after that you can't change LA any more. I receive this error:\r\n\r\nWarning in run(timeoutMs) :\r\n  Unhandled error in observer: missing value where TRUE/FALSE needed\r\nobserve({\r\n    LA <- findLA()\r\n    dataDir <- file.path(\"..\", \"pct-data\", LA)\r\n    if (session$dataDir != dataDir && !is.null(LA) && file.exists(dataDir)) {\r\n        session$dataDir <- dataDir\r\n        loadData(session)\r\n        updateSelectInput(session, \"scenario\", selected = \"base\")\r\n    }\r\n    session$dataDir\r\n})\r\n\r\nDoes it appear on your end too?"}}